]> git.donarmstrong.com Git - lilypond.git/commitdiff
lilypond-1.5.31
authorfred <fred>
Wed, 27 Mar 2002 02:05:16 +0000 (02:05 +0000)
committerfred <fred>
Wed, 27 Mar 2002 02:05:16 +0000 (02:05 +0000)
input/regression/breathing-sign.ly
input/regression/non-empty-text.ly
input/regression/stanza-number.ly
input/template/piano-dynamics.ly
input/test/markup.ly
lily/text-engraver.cc
lilypond-mode.el
ly/engraver-init.ly

index 5ad99b6e825535b1c9cf174c7fb0833b3611e124..a663a8a001aa44b4399237726c47879c1f29ffb0 100644 (file)
@@ -21,7 +21,11 @@ two measures all have the same distance from each other:
     < \context Voice = two { \stemDown es4 \breathe bes es }
       \context Voice = one { \stemUp g4 as g }
     > |
-    es8 d es f g4 \breathe |
+% Change to wedge:
+    \property Voice.BreathingSign \override #'text = #"scripts-upbow"
+    es8 d es f g8 \breathe f |
+% Revert to old layout:
+    \property Voice.BreathingSign \override #'molecule-callback = #Breathing_sign::brew_molecule
     es8 d \breathe es f g f |
     es2 r4 \bar "||"
   }
index d3eee8bedce9bc19272745a0274cd9f6f97b47be..43c81652d8c176354ead6c51d3df0b969b9011a6 100644 (file)
@@ -7,11 +7,12 @@ textNonEmpty is used to respect the horizontal size of text.
 "
 }
 \score { \notes {
-\property Voice.TextScript \override #'no-spacing-rods = ##f
-c4_"very wide and long text" c4
+c2_"very wide and long text" c | \break
+\fatText  % short for \property Voice.textNonEmpty = ##t
+c_"very wide and long text" c
 }
 
 \paper {
-  linewidth  = -1.0
+  linewidth  = 3.\cm
   }
 }
index bd56fc5ad590ad69260f6248a605412dae03282c..55991ad5a29ee7a0cfcae85986f9c92345ca8e76 100644 (file)
@@ -7,7 +7,7 @@ texidoc = "Stanza numbers may differ for the first and following systems."
 < \context LyricsVoice \lyrics {
 
 \property LyricsVoice . stanza =  "first"
-\property LyricsVoice . stz =  "2nd"
+\property LyricsVoice . stz =  #'("2" (super "nd"))
 Foo1 Bar1   }
 
 \notes { c''1 \break c''1 }>} 
index 59a0a0821816bd54a27778162e38ba68fd77cae3..e95a273378de69b2f2de613033a917557568f022 100644 (file)
@@ -26,11 +26,7 @@ lower = \notes\relative c {
 }
 
 dynamics = \notes {
-  \outputproperty #(make-type-checker 'dynamic-interface)
-    #'extra-offset = #'(0 . 2.5)
   s2\fff\> s4
-  \outputproperty #(make-type-checker 'dynamic-interface)
-    #'extra-offset = #'(0 . 2.5)
   \!s\pp
 }
 
@@ -67,6 +63,8 @@ pedal = \notes {
 
       TextScript \override #'font-relative-size = #1
       TextScript \override #'font-shape = #'italic
+      DynamicText \override #'extra-offset = #'(0 . 2.5)
+      Hairpin \override #'extra-offset = #'(0 . 2.5)
 
       \consists "Skip_req_swallow_translator"
 
index 621567dbad6e0c9f25033a80cde19cb00d0c8375..17474621c21663ffbd10153c9c13f936adc0e707 100644 (file)
                d-#'(lines "Violoncello" "    e" "Contrabasso")
                e-#'((lines (baselineskip . 0) (kern . 1.5)) "Violoncello" "    e" "Contrabasso")
                e-#'(((baselineskip . 0) (kern . 1.5) lines) "Violoncello" "    e" "Contrabasso")
+               g-"ÅÖÄÜÇÕ"
                }
        \paper{
                linewidth = -1.\mm
-               \translator{
+               fontenc = "T1"
+               \translator{
                        \ScoreContext
                        TextScript \override #'font-family = #'roman
                        TextScript \override #'font-shape = #'upright
                        TextScript \revert #'no-spacing-rods
                        TextScript \override #'direction = #1
-               }
+                       TextScript \override #'font-encoding = #'T1
+       }
        }
 }
index 3a463407f2d35ac0e2078c7bc02e13f2a1e93c5d..38716da2af5d008b43a8145f37feccc89cc97cf1 100644 (file)
@@ -128,12 +128,17 @@ Text_engraver::create_grobs ()
       text->set_grob_property ("text", r->get_mus_property ("text"));
       
       SCM nonempty = get_property ("textNonEmpty");
-      if (to_boolean (nonempty))
-       /*
-         empty text: signal that no rods should be applied.  
-        */
-       text->set_grob_property ("no-spacing-rods" , SCM_BOOL_F);
-               
+
+      if (gh_boolean_p (nonempty))
+       if (gh_scm2bool (nonempty))
+         /*
+           empty text: signal that no rods should be applied.
+           Default nowadays.
+         */
+         text->set_grob_property ("no-spacing-rods" , SCM_BOOL_F);
+       else
+         text->set_grob_property ("no-spacing-rods" , SCM_BOOL_T);
+       
       announce_grob (text, r->self_scm ());
       texts_.push (text);
     }
index b2331af875e20e5759ec4b82748c88e5300b7a64..23696508eedd6e5c6265da7714c19bd90cbd9dc7 100644 (file)
@@ -262,6 +262,8 @@ Must be the car of an entry in `LilyPond-command-alist'."
                           ;;"LilyPond"
                           LilyPond-command-default))
                        (t LilyPond-command-default)))
+
+         (completion-ignore-case t)
         
         (answer (or LilyPond-command-force
                     (completing-read
index 8acac587dadc5a93b82918dd8a49c47d76855315..5c309e6fb4a53d3809799f331083aa27b2b29e28 100644 (file)
@@ -240,6 +240,7 @@ LyricsVoiceContext= \translator{
        \consists "Extender_engraver"
        \consists "Hyphen_engraver"
        \consists "Stanza_number_engraver"
+       \consists "Skip_req_swallow_translator"
        phrasingPunctuation = #".,:!?\""
        
 }