From: hanwen <hanwen>
Date: Thu, 1 Sep 2005 08:43:51 +0000 (+0000)
Subject: (grob-cause): escape spaces in URLs.
X-Git-Tag: release/2.6.4~9
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a96179b92e7e2d5155b7ca008ebe055b62fceb82;p=lilypond.git

(grob-cause): escape spaces in URLs.
---

diff --git a/ChangeLog b/ChangeLog
index ece3237013..76c0cf96bc 100644
--- 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 931789e3e6..aa5a247dad 100644
--- 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 fe168a103f..8ad92dc74c 100644
--- 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))