]> git.donarmstrong.com Git - lilypond.git/commitdiff
*** empty log message ***
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Wed, 4 Oct 2006 12:01:48 +0000 (12:01 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Wed, 4 Oct 2006 12:01:48 +0000 (12:01 +0000)
ChangeLog
lily/dynamic-engraver.cc
lily/note-name-engraver.cc
lily/pitched-trill-engraver.cc
scm/define-grobs.scm
scm/output-lib.scm

index 7a39b8d69d90a90b3279c84cd5aaddd1f16fc738..b4cbfa60c63b756ced3d0480a3f89bae7b4668c6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -4,6 +4,17 @@
 
 2006-10-04  Han-Wen Nienhuys  <hanwen@lilypond.org>
 
+       * lily/note-name-engraver.cc: doc engraver.
+
+       * scm/output-lib.scm (hairpin::calc-grow-direction): new function.
+
+       * lily/dynamic-engraver.cc (process_music): don't set grow-direction.
+
+       * scm/define-grobs.scm (all-grob-descriptions): calc duration-log
+       by callback.
+
+       * lily/stem-engraver.cc (make_stem): don't set duration-log
+
        * scripts/lilypond-book.py (Lilypond_file_snippet.my_system):
        write snippet-names binary.
 
index d8795f0bdc76f025383093c42180b150e5cac1eb..daba7713865d3c82d43b6a8f8603992fb23a852d 100644 (file)
@@ -241,9 +241,6 @@ Dynamic_engraver::process_music ()
                                                     ly_symbol2scm ("adjacent-hairpins"),
                                                     finished_cresc_);
                }
-             cresc_->set_property ("grow-direction",
-                                   scm_from_int ((start_type == "crescendo")
-                                                 ? BIGGER : SMALLER));
            }
 
          /*
index 32253cb2bc3157d817991e93e9392b6485e0fd26..132bd17e29d552c95a153581a9201f4e1e04631d 100644 (file)
@@ -67,7 +67,7 @@ Note_name_engraver::Note_name_engraver ()
 }
 
 ADD_TRANSLATOR (Note_name_engraver,
-               /* doc */ "",
+               /* doc */ "Print pitches as words.",
                /* create */ "NoteName",
                /* accept */ "note-event",
                /* read */ "printOctaveNames",
index 5044552a529ad93fdc033b9929c987ed4d3e523d..71913d2bb9e4c7dee1d8ae74fb263b381facea65 100644 (file)
@@ -144,11 +144,16 @@ ADD_ACKNOWLEDGER (Pitched_trill_engraver, dots);
 ADD_ACKNOWLEDGER (Pitched_trill_engraver, text_spanner);
 
 ADD_TRANSLATOR (Pitched_trill_engraver,
-               /* doc */ "Print the bracketed notehead after a notehead with trill.",
+               /* doc */
+               "Print the bracketed notehead after a notehead with trill.",
+
                /* create */
                "TrillPitchHead "
                "TrillPitchAccidental "
-               "TrillPitchGroup",
+               "TrillPitchGroup ",
+
                /* accept */ "",
+
                /* read */ "",
+
                /* write */ "");
index 333c6a8e9e1179521727b056976fc916fc570090..97de2fd69f997fb9dc903193bcd6faa1d1be7a49 100644 (file)
        (stencil . ,ly:hairpin::print)
        (springs-and-rods . ,ly:spanner::set-spacing-rods)
        (after-line-breaking . ,ly:hairpin::after-line-breaking)
+       (grow-direction . ,hairpin::calc-grow-direction)
        (circled-tip . #f)
        (thickness . 1.0)
        (height . 0.6666)
index 90edde716a4c0e082334b7901665ca9d9a3b8c4f..93e61dd9d96f1c25f31b230169b2d305715697cf 100644 (file)
@@ -416,3 +416,11 @@ centered, X==1 is at the right, X == -1 is at the left."
     
     (number->string digit 10)
   ))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; dynamics
+(define-public (hairpin::calc-grow-direction grob)
+  (if (eq? (ly:event-property (event-cause grob) 'class) 'decrescendo-event)
+      START
+      STOP
+      ))