diff options
Diffstat (limited to 'dev-scheme/guile-www/files/guile-www-2.30-alive.test2.patch')
| -rw-r--r-- | dev-scheme/guile-www/files/guile-www-2.30-alive.test2.patch | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/dev-scheme/guile-www/files/guile-www-2.30-alive.test2.patch b/dev-scheme/guile-www/files/guile-www-2.30-alive.test2.patch new file mode 100644 index 000000000000..9cf7efe984ab --- /dev/null +++ b/dev-scheme/guile-www/files/guile-www-2.30-alive.test2.patch @@ -0,0 +1,51 @@ +From cfabb94ca727d63f5712860c3fe4132926e498c9 Mon Sep 17 00:00:00 2001 +From: Thien-Thi Nguyen <ttn@gnuvola.org> +Date: Mon, 02 May 2011 08:32:02 +0000 +Subject: [v] Refine preload: Prioritize "" instead of deleting ".scm". + +The 2011-04-28 change goes too far; it impedes +loading system modules used by Guile-WWW modules. +Reported by (Savannah user) vonbecmann: +<https://savannah.nongnu.org/bugs/?33175>. + +* source/alive.test: Don't delete ".scm" from ‘%load-extensions’; +instead, ensure only that "" is at the beginning of the list. +--- +diff --git a/source/ChangeLog b/source/ChangeLog +index 2de79f4..ece831e 100644 +--- a/source/ChangeLog ++++ b/source/ChangeLog +@@ -1,3 +1,15 @@ ++2011-05-02 Thien-Thi Nguyen <ttn@gnuvola.org> ++ ++ [v] Refine preload: Prioritize "" instead of deleting ".scm". ++ ++ The 2011-04-28 change goes too far; it impedes ++ loading system modules used by Guile-WWW modules. ++ Reported by (Savannah user) vonbecmann: ++ <https://savannah.nongnu.org/bugs/?33175>. ++ ++ * alive.test: Don't delete ".scm" from ‘%load-extensions’; ++ instead, ensure only that "" is at the beginning of the list. ++ + 2011-04-28 Thien-Thi Nguyen <ttn@gnuvola.org> + + [v] Make alive.test avoid (mis-)loading the .scm files, if possible. +diff --git a/source/alive.test b/source/alive.test +index 76e91c8..6e430f4 100755 +--- a/source/alive.test ++++ b/source/alive.test +@@ -39,8 +39,10 @@ decho 'guile:' + if $debug ; then ${GUILE-guile} --version ; fi + + if $guile -c '%load-extensions' >/dev/null 2>&1 ; then ++ # Make sure "" is at head of list. + preload=alive.preload +- echo '(set! %load-extensions (delete ".scm" %load-extensions))' > $preload ++ echo '(set! %load-extensions (delete "" %load-extensions))' > $preload ++ echo '(set! %load-extensions (cons "" %load-extensions))' >> $preload + if $debug ; then + decho 'preload:' + cat $preload +-- +cgit v0.9.0.2 |