lilypond-1.5.8

diff --git a/Documentation/topdocs/AUTHORS.texi b/Documentation/topdocs/AUTHORS.texi
index 269c1aeb01bcaa6a12a330182102ca203b27c88b..bd444931a45c80b01a320a8e2cf5fd4ebc6d35eb 100644 (file)
--- a/Documentation/topdocs/AUTHORS.texi
+++ b/Documentation/topdocs/AUTHORS.texi
@@ -35,6 +35,8 @@ list is alphabetically ordered.
     German glossary stuff.
 @item @email{nj104@@cus.cam.ac.uk, Neil Jerram}. 
     parts of Documentation/Vocab*
+@item @email{heikki.junes@@hut.fi, Heikki Junes}. 
+    Finnish note names
 @item Donald Ervin Knuth,  @uref{http://www-cs-staff.stanford.edu/~knuth/}
     mf/ital-*.mf (these were taken from the CM fonts)
 @item @email{m.krause@@tu-harburg.de, Michael Krause},

diff --git a/lilypond-mode.el b/lilypond-mode.el
index 8ea8cf8b7dbb11ba722096c8f3423bf9bf35bf97..e0b7de1c765c696256f5634f988ddafce8225c92 100644 (file)
--- a/lilypond-mode.el
+++ b/lilypond-mode.el
@@ -4,6 +4,9 @@
 ;;; source file of the GNU LilyPond music typesetter
 ;;; 
 ;;; (c) 1999--2001 Jan Nieuwenhuizen <janneke@gnu.org>
+;;; 
+;;; Changed 29th Aug 2001 Heikki Junes <heikki.junes@hut.fi>
+;;;    * Add PS-compilation, PS-viewing and MIDI-play
 
 ;;; Inspired on auctex
 
@@ -132,6 +135,18 @@ in LilyPond-include-path."
   :group 'LilyPond
   :type 'string)
 
+(defcustom LilyPond-gv-command "gv -watch"
+  "Command used to display PS files."
+
+  :group 'LilyPond
+  :type 'string)
+
+(defcustom LilyPond-midi-command "timidity"
+  "Command used to play MIDI files."
+
+  :group 'LilyPond
+  :type 'string)
+
 ;; This is the major configuration variable.
 (defcustom LilyPond-command-alist
   `(
@@ -139,6 +154,7 @@ in LilyPond-include-path."
     ("TeX" . ("tex '\\nonstopmode\\input %t'" . "View"))
 
     ("2Dvi" . ("ly2dvi %s" . "View"))
+    ("2PS" . ("ly2dvi -P %s" . "View"))
 
     ("Book" . ("lilypond-book %x" . "LaTeX"))
     ("LaTeX" . ("latex '\\nonstopmode\\input %l'" . "View"))
@@ -148,6 +164,10 @@ in LilyPond-include-path."
     
     ;; refreshes when kicked USR1
     ("View" . (,(concat LilyPond-xdvi-command " %d") . "LilyPond"))
+
+    ("ViewPS" . (,(concat LilyPond-gv-command " %p") . "LilyPond"))
+
+    ("Midi" . (,(concat LilyPond-midi-command " %m") . "LilyPond"))
     )
 
   "AList of commands to execute on the current document.
@@ -180,6 +200,7 @@ LilyPond-expand-list.
     ("%p" . ".ps")
     ("%l" . ".latex")
     ("%x" . ".tely")
+    ("%m" . ".midi")
     )
     
   "Alist of expansion strings for LilyPond command names."

diff --git a/scm/tex.scm b/scm/tex.scm
index fa3411bed522d78336fe0ca50fbe08945110e639..1a1ec47cf61a93af6ad48092e6e313393af0552d 100644 (file)
--- a/scm/tex.scm
+++ b/scm/tex.scm
@@ -106,7 +106,7 @@
         (ly-gulp-file "music-drawing-routines.ps"))
      (if (defined? 'ps-testing) "/testing true def%\n" "")
      "}"
-     "\\input lilyponddefs\\newdimen\\outputscale \\outputscale=\\lilypondpaperoutputscale pt\\turnOnPostScript"))
+     "\\input lilyponddefs \\outputscale=\\lilypondpaperoutputscale pt\\turnOnPostScript"))
 
   ;; Note: this string must match the string in ly2dvi.py!!!
   (define (header creator generate) 

diff --git a/scripts/GNUmakefile b/scripts/GNUmakefile
index 318e463cc75567187732acec106837453cbac77d..eb0687f223ef3c60fe3ba98a28b94768e141dff1 100644 (file)
--- a/scripts/GNUmakefile
+++ b/scripts/GNUmakefile
@@ -1,12 +1,12 @@
 # bin/Makefile
 
 depth = ..
+
 SEXECUTABLES=convert-ly lilypond-book ly2dvi abc2ly as2text etf2ly musedata2ly pmx2ly mup2ly
 STEPMAKE_TEMPLATES=script help2man po
 HELP2MAN_EXECS = $(SEXECUTABLES)
 
 include $(depth)/make/stepmake.make 
-
 include $(stepdir)/executable-targets.make
 
 

diff --git a/tex/lilyponddefs.tex b/tex/lilyponddefs.tex
index 78efb4bc8b39421a5abdbffa08b1109a57d6532d..0b00c76eb1a6c18897ce6da38830d335b68c3558 100644 (file)
--- a/tex/lilyponddefs.tex
+++ b/tex/lilyponddefs.tex
@@ -78,5 +78,5 @@
         \csname%
         nolilyfooter\texsuffix\endcsname
 \fi
-
+\newdimen\outputscale
 \endinput