From: Nicolas Sceaux Date: Mon, 28 Jun 2004 12:57:37 +0000 (+0000) Subject: * elisp/lilypond-mode.el (LilyPond-guile): set current module to X-Git-Tag: release/2.2.4~4^2~7 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f7d4cbea2d932929f838d418a65c96b60c829750;p=lilypond.git * elisp/lilypond-mode.el (LilyPond-guile): set current module to (*anonymous-ly-0*) iso. (*anonymous-ly-1*) --- 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)"))