From f7d4cbea2d932929f838d418a65c96b60c829750 Mon Sep 17 00:00:00 2001 From: Nicolas Sceaux Date: Mon, 28 Jun 2004 12:57:37 +0000 Subject: [PATCH 1/1] * elisp/lilypond-mode.el (LilyPond-guile): set current module to (*anonymous-ly-0*) iso. (*anonymous-ly-1*) --- ChangeLog | 5 +++++ elisp/lilypond-mode.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index a7d36b262e..44d24469fb 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2004-06-28 Nicolas Sceaux + + * elisp/lilypond-mode.el (LilyPond-guile): set current module to + (*anonymous-ly-0*) iso. (*anonymous-ly-1*) + 2004-06-28 Jan Nieuwenhuizen * buildscripts/guile-gnome.sh (PATH): GUILE CVS is still fubarred. diff --git a/elisp/lilypond-mode.el b/elisp/lilypond-mode.el index 17bca7a599..d37c7d4c51 100644 --- a/elisp/lilypond-mode.el +++ b/elisp/lilypond-mode.el @@ -1179,7 +1179,7 @@ LilyPond-xdvi-command\t\tcommand to display dvi files -- bit superfluous" (require 'ilisp) (guile "lilyguile" (LilyPond-command-expand (cadr (assoc "2Dvi" LilyPond-command-alist)) (funcall 'LilyPond-get-master-file))) - (comint-default-send (ilisp-process) "(define-module (*anonymous-ly-1*))") + (comint-default-send (ilisp-process) "(define-module (*anonymous-ly-0*))") (comint-default-send (ilisp-process) "(set! %load-path (cons \"/usr/share/ilisp/\" %load-path))") (comint-default-send (ilisp-process) "(use-modules (guile-user) (guile-ilisp))") (comint-default-send (ilisp-process) "(newline)")) -- 2.39.2