(grob-cause): escape spaces in URLs.

diff --git a/ChangeLog b/ChangeLog
index ece323701334f36dcf25b5839139e3535a91f1b6..76c0cf96bc17f899bd8b572776a9ceca8d5ef17e 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2005-09-01  Han-Wen Nienhuys  <hanwen@xs4all.nl>
+
+       * scm/output-ps.scm (grob-cause): escape spaces in URLs.
+
 2005-08-31  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
        * lily/ly-module.cc (make_stand_in_procs_weak): backport: compat

diff --git a/lily/ly-module.cc b/lily/ly-module.cc
index 931789e3e62817940ac112302b68447718747d92..aa5a247dad8ab386a12ef76f365e61499aff5064 100644 (file)
--- a/lily/ly-module.cc
+++ b/lily/ly-module.cc
@@ -16,7 +16,6 @@
 
 #ifdef MODULE_GC_KLUDGE
 Protected_scm anonymous_modules = SCM_EOL;
-
 #endif
 
 LY_DEFINE(ly_clear_anonymous_modules, "ly:clear-anonymous-modules",
@@ -236,6 +235,7 @@ make_stand_in_procs_weak ()
     {
       return; 
     }
+  
   SCM old_tab = scm_stand_in_procs;
   SCM new_tab = scm_make_weak_key_hash_table (scm_from_int (257));
   

diff --git a/scm/output-ps.scm b/scm/output-ps.scm
index fe168a103ffca1302e729a9f21d02881d7ed09ae..8ad92dc74c900551cf6d9e1bdea8655720f3423e 100644 (file)
--- a/scm/output-ps.scm
+++ b/scm/output-ps.scm
@@ -212,7 +212,7 @@
                      (+ (cdr offset) (car y-ext))
                      (+ (car offset) (cdr x-ext))
                      (+ (cdr offset) (cdr y-ext))
-                     file
+                     (string-regexp-substitute " " "%20" file)
                      (cadr location)
                      (caddr location)
                      (cadddr location))