> Han-Wen Nienhuys <[EMAIL PROTECTED]> writes:
>> There is also some other good news: some of the dependencies for the
>> LilyPond GNOME backend have been released or are almost ready to be
>> released. This means that in a short while we will have "native"
>> point-and-click, without requiring TeX or DVI.
I have some troubles with it: feta fonts seem not to be found when
the gnome output is displayed, although I have done:
$ ln -s ~/cvs/lilypond/mf/out ~/.fonts
$ mkfontdir ~/.fonts
$ xset +fp ~/.fonts
(It used to work some months ago)
Does someone think about an extra thing to do?
Besides that, point-and-click works fine.
when it's time to add a 2Gnome command in emacs LilyPond-mode, here is
a patch:
Index: elisp/lilypond-init.el
===================================================================
RCS file: /cvsroot/lilypond/lilypond/elisp/lilypond-init.el,v
retrieving revision 1.2
diff -u -r1.2 lilypond-init.el
--- elisp/lilypond-init.el 22 Mar 2004 22:21:54 -0000 1.2
+++ elisp/lilypond-init.el 19 Sep 2004 08:52:35 -0000
@@ -15,6 +15,6 @@
;(setq load-path (append (list (expand-file-name "~/site-lisp")) load-path))
(autoload 'LilyPond-mode "lilypond-mode" "LilyPond Editing Mode" t)
-(add-to-list 'auto-mode-alist '("\\.ly$" . LilyPond-mode))
+(add-to-list 'auto-mode-alist '("\\.ly\\(inc\\)?$" . LilyPond-mode))
(add-hook 'LilyPond-mode-hook (lambda () (turn-on-font-lock)))
Index: elisp/lilypond-mode.el
===================================================================
RCS file: /cvsroot/lilypond/lilypond/elisp/lilypond-mode.el,v
retrieving revision 1.11
diff -u -r1.11 lilypond-mode.el
--- elisp/lilypond-mode.el 10 Aug 2004 22:42:35 -0000 1.11
+++ elisp/lilypond-mode.el 19 Sep 2004 08:52:36 -0000
@@ -416,6 +416,7 @@
("2Dvi" . ("lilypond -f tex %s" "%s" "%d" "LaTeX"))
("2PS" . ("lilypond -f ps %s" "%s" "%p" "ViewPS"))
+ ("2Gnome" . ("lilypond -fgnome %s"))
("2Midi" . ("lilypond -m %s" "%s" "%m" "Midi"))
("Book" . ("lilypond-book %x" "%x" "%l" "LaTeX"))
@@ -557,6 +558,11 @@
(LilyPond-command (LilyPond-command-menu "2PS") 'LilyPond-get-master-file)
)
+(defun LilyPond-command-formatgnome ()
+ "Format the Gnome output of the current document."
+ (interactive)
+ (LilyPond-command (LilyPond-command-menu "2Gnome") 'LilyPond-get-master-file))
+
(defun LilyPond-command-formatmidi ()
"Format the midi output of the current document."
(interactive)
@@ -683,7 +689,7 @@
(while (LilyPond-running)
(message "Starts playing midi once it is built.")
(sit-for 0 100))))))
- (if (member name (list "LilyPond" "TeX" "2Midi" "2PS" "2Dvi"
+ (if (member name (list "LilyPond" "TeX" "2Midi" "2PS" "2Dvi" "2Gnome"
"Book" "LaTeX"))
(if (setq jobs (LilyPond-running))
(progn
@@ -743,6 +749,7 @@
(define-key LilyPond-mode-map "\C-cm" 'LilyPond-command-formatmidi)
(define-key LilyPond-mode-map "\C-c\C-d" 'LilyPond-command-formatdvi)
(define-key LilyPond-mode-map "\C-c\C-f" 'LilyPond-command-formatps)
+ (define-key LilyPond-mode-map "\C-c\C-g" 'LilyPond-command-formatgnome)
(define-key LilyPond-mode-map "\C-c\C-s" 'LilyPond-command-smartview)
(define-key LilyPond-mode-map "\C-c\C-v" 'LilyPond-command-view)
(define-key LilyPond-mode-map "\C-c\C-p" 'LilyPond-command-viewps)
@@ -963,6 +970,7 @@
'([ "TeX" (LilyPond-command (LilyPond-command-menu "TeX") 'LilyPond-get-master-file) ])
'([ "2Dvi" LilyPond-command-formatdvi t])
'([ "2PS" LilyPond-command-formatps t])
+ '([ "2Gnome" LilyPond-command-formatgnome t])
'([ "2Midi" LilyPond-command-formatmidi t])
'([ "Book" (LilyPond-command (LilyPond-command-menu "Book") 'LilyPond-get-master-file) ])
'([ "LaTeX" (LilyPond-command (LilyPond-command-menu "LaTeX") 'LilyPond-get-master-file) ])
_______________________________________________
lilypond-devel mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/lilypond-devel
