(dir_down): remove underscores from

glyph names. Underscores are not allowed .ps encoding files.

diff --git a/ChangeLog b/ChangeLog
index c7cdb2aab916e4e64b946bb6c494abdb166ce33e..b05cac79580c838775519a5936ac470af91ee317 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-05-01  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+       * mf/parmesan-custodes.mf (dir_down): remove underscores from
+       glyph names. Underscores are not allowed .ps encoding files.
+
 2003-04-30  Juergen Reuter  <reuter@ipd.uka.de>
 
        * lily/spacing-spanner.cc, ly/paper-init.ly: introduced paper

diff --git a/Documentation/misc/ChangeLog-1.5 b/Documentation/misc/ChangeLog-1.5
index 6c889e0eb2c26b330cfa9d6575126ab283a6c7fc..c561b28b6b489f831b4748ed34b745b82e53c29e 100644 (file)
--- a/Documentation/misc/ChangeLog-1.5
+++ b/Documentation/misc/ChangeLog-1.5
@@ -3563,7 +3563,6 @@ i2002-07-12  Mats Bengtsson  <matsb@s3.kth.se>
        * lily/staff-spacing.cc (next_notes_correction): Correct the
        spacing of a note following a barline.
 
-
 2002-03-04  Glen Prideaux
 
        * mf/feta-solfa.mf: Shaped note heads

diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely
index 1c4beb5ac9a59d30933f15184cbee0922a3b94f4..89452552bac016ae6fe916ff78850f713caf74cd 100644 (file)
--- a/Documentation/user/refman.itely
+++ b/Documentation/user/refman.itely
@@ -4785,8 +4785,8 @@ in the context, with the following arguments:
 @item the context where @code{\applyoutput} is processed.
 @end itemize
 
-The cause of the grob, i.e.  the music expression or object that was
-responsible for creating the object, is in the object property
+In addition, the cause of the grob, i.e.  the music expression or object
+that was responsible for creating the object, is in the object property
 @code{cause}.  For example, for a note head, this is a
 @internalsref{NoteHead} event, and for a @internalsref{Stem} object,
 this is a @internalsref{NoteHead} object.

diff --git a/input/mutopia/R.Schumann/romanze-op28-2.ly b/input/mutopia/R.Schumann/romanze-op28-2.ly
index eabcf57b944138b4381fc1285ca5571b50838c66..54212f4726766f94bdbc898688efee584e365f70 100644 (file)
--- a/input/mutopia/R.Schumann/romanze-op28-2.ly
+++ b/input/mutopia/R.Schumann/romanze-op28-2.ly
@@ -236,7 +236,11 @@ leftb = \notes \transpose c cis {
     \property PianoStaff.connectArpeggios = ##t
     \property PianoStaff.Arpeggio \override #'molecule-callback = \arpeggioBracket
 
-    \property PianoStaff.instrument="\Huge\bf\it 2."
+    \property PianoStaff.InstrumentName \set #'font-relative-size   = #3
+    \property PianoStaff.InstrumentName \set #'font-shape   = #'italic
+    \property PianoStaff.InstrumentName \set #'font-magnification   = #3
+    
+    \property PianoStaff.instrument="2. "
     \context Staff = up {
       \property Staff.DynamicLineSpanner \override #'direction = #-1
       \clef G <\global \context Voice=upv \righta>

diff --git a/lily/item.cc b/lily/item.cc
index 236885dc328f8db57e8999cad82c8cfdfc42910f..89eb804389031d79e3ab42cf8c642a7238d85e7f 100644 (file)
--- a/lily/item.cc
+++ b/lily/item.cc
@@ -6,7 +6,6 @@
   (c)  1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
-
 #include "paper-score.hh"
 #include "warn.hh"
 #include "item.hh"

diff --git a/mf/parmesan-custodes.mf b/mf/parmesan-custodes.mf
index 82e5e89446d9cd95ae7503d25f084e34ab346c40..b4a0be94a056d2e4592a4c23e5a4621c8ad6fbc5 100644 (file)
--- a/mf/parmesan-custodes.mf
+++ b/mf/parmesan-custodes.mf
@@ -80,27 +80,27 @@ def custos_hufnagel(expr verbose_name, internal_name, ly_name,
 enddef;
 
 % custos hufnagel, stem up, between staff lines
-custos_hufnagel("Custos Hufnagel", "hufnagel-u0", "hufnagel_u0",
+custos_hufnagel("Custos Hufnagel", "hufnagel-u0", "hufnagelu0",
                dir_up, between_staff_lines);
 
 % custos hufnagel, stem up, on staff line
-custos_hufnagel("Custos Hufnagel", "hufnagel-u1", "hufnagel_u1",
+custos_hufnagel("Custos Hufnagel", "hufnagel-u1", "hufnagelu1",
                dir_up, on_staff_line);
 
 % custos hufnagel, stem up, anywhere
-custos_hufnagel("Custos Hufnagel", "hufnagel-u2", "hufnagel_u2",
+custos_hufnagel("Custos Hufnagel", "hufnagel-u2", "hufnagelu2",
                dir_up, anywhere);
 
 % custos hufnagel, stem down, between staff lines
-custos_hufnagel("Reverse Custos Hufnagel", "hufnagel-d0", "hufnagel_d0",
+custos_hufnagel("Reverse Custos Hufnagel", "hufnagel-d0", "hufnageld0",
                dir_down, between_staff_lines);
 
 % custos hufnagel, stem down, on staff line
-custos_hufnagel("Reverse Custos Hufnagel", "hufnagel-d1", "hufnagel_d1",
+custos_hufnagel("Reverse Custos Hufnagel", "hufnagel-d1", "hufnageld1",
                dir_down, on_staff_line);
 
 % custos hufnagel, stem down, anywhere
-custos_hufnagel("Reverse Custos Hufnagel", "hufnagel-d2", "hufnagel_d2",
+custos_hufnagel("Reverse Custos Hufnagel", "hufnagel-d2", "hufnageld2",
                dir_down, anywhere);
 
 %%%%%%%%
@@ -166,15 +166,15 @@ custos_medicaea("Custos Med.", "medicaea-u2", "medicaea_u2",
                dir_up, anywhere);
 
 % custos medicaea, stem down, between staff lines
-custos_medicaea("Reverse Custos Med.", "medicaea-d0", "medicaea_d0",
+custos_medicaea("Reverse Custos Med.", "medicaea-d0", "medicaead0",
                dir_down, between_staff_lines);
 
 % custos medicaea, stem down, on staff line
-custos_medicaea("Reverse Custos Med.", "medicaea-d1", "medicaea_d1",
+custos_medicaea("Reverse Custos Med.", "medicaea-d1", "medicaead1",
                dir_down, on_staff_line);
 
 % custos medicaea, stem down, anywhere
-custos_medicaea("Reverse Custos Med.", "medicaea-d2", "medicaea_d2",
+custos_medicaea("Reverse Custos Med.", "medicaea-d2", "medicaead2",
                dir_down, anywhere);
 
 %%%%%%%%
@@ -241,15 +241,15 @@ custos_vaticana("Custos Ed. Vat.", "vaticana-u2", "vaticana_u2",
                dir_up, anywhere);
 
 % custos vaticana, stem down, between staff lines
-custos_vaticana("Reverse Custos Ed. Vat.", "vaticana-d0", "vaticana_d0",
+custos_vaticana("Reverse Custos Ed. Vat.", "vaticana-d0", "vaticanad0",
                dir_down, between_staff_lines);
 
 % custos vaticana, stem down, on_staff_line
-custos_vaticana("Reverse Custos Ed. Vat.", "vaticana-d1", "vaticana_d1",
+custos_vaticana("Reverse Custos Ed. Vat.", "vaticana-d1", "vaticanad1",
                dir_down, on_staff_line);
 
 % custos vaticana, stem down, anywhere
-custos_vaticana("Reverse Custos Ed. Vat.", "vaticana-d2", "vaticana_d2",
+custos_vaticana("Reverse Custos Ed. Vat.", "vaticana-d2", "vaticanad2",
                dir_down, anywhere);
 
 %%%%%%%%
@@ -303,27 +303,27 @@ def custos_mensural(expr verbose_name, internal_name, ly_name,
 enddef;
 
 % custos mensural, stem up, between staff lines
-custos_mensural("Custos Mensural", "mensural-u0", "mensural_u0",
+custos_mensural("Custos Mensural", "mensural-u0", "mensuralu0",
                dir_up, between_staff_lines);
 
 % custos mensural, stem up, on staff line
-custos_mensural("Custos Mensural", "mensural-u1", "mensural_u1",
+custos_mensural("Custos Mensural", "mensural-u1", "mensuralu1",
                dir_up, on_staff_line);
 
 % custos mensural, stem up, anywhere
-custos_mensural("Custos Mensural", "mensural-u2", "mensural_u2",
+custos_mensural("Custos Mensural", "mensural-u2", "mensuralu2",
                dir_up, anywhere);
 
 % custos mensural, stem down, between staff lines
-custos_mensural("Reverse Custos Mensural", "mensural-d0", "mensural_d0",
+custos_mensural("Reverse Custos Mensural", "mensural-d0", "mensurald0",
                dir_down, between_staff_lines);
 
 % custos mensural, stem down, on staff line
-custos_mensural("Reverse Custos Mensural", "mensural-d1", "mensural_d1",
+custos_mensural("Reverse Custos Mensural", "mensural-d1", "mensurald1",
                dir_down, on_staff_line);
 
 % custos mensural, stem down, anywhere
-custos_mensural("Reverse Custos Mensural", "mensural-d2", "mensural_d2",
+custos_mensural("Reverse Custos Mensural", "mensural-d2", "mensurald2",
                dir_down, anywhere);
 
 fet_endgroup ("custodes")

diff --git a/scm/chords-ignatzek.scm b/scm/chords-ignatzek.scm
index f1c61ff517abe830d106b9832f518deb41c383a3..5ef42c0a69da2e906eeb5dba2df3f863ef0c5c70 100644 (file)
--- a/scm/chords-ignatzek.scm
+++ b/scm/chords-ignatzek.scm
@@ -1,3 +1,9 @@
+;; implement Ignatzek chord naming
+;; 
+;;  source file of the GNU LilyPond music typesetter
+;;
+;; (c) 2003 Han-Wen Nienhuys
+
 (define (natural-chord-alteration p)
   "Return the natural alteration for step P."
   (if (= (ly:pitch-steps p) 6)