CVSROOT:        /cvsroot/lilypond
Module name:    lilypond
Branch:         
Changes by:     Han-Wen Nienhuys <[EMAIL PROTECTED]>    05/10/21 14:07:47

Modified files:
        .              : ChangeLog 
        Documentation/user: changing-defaults.itely introduction.itely 
        lily           : grob-property.cc 
        ly             : bagpipe.ly gregorian-init.ly property-init.ly 

Log message:
        * lily/grob-property.cc: remove add_to_list_property().
        
        * lily/grob-property.cc (del_property): new function.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ChangeLog.diff?tr1=1.4203&tr2=1.4204&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/Documentation/user/changing-defaults.itely.diff?tr1=1.140&tr2=1.141&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/Documentation/user/introduction.itely.diff?tr1=1.146&tr2=1.147&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/grob-property.cc.diff?tr1=1.41&tr2=1.42&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ly/bagpipe.ly.diff?tr1=1.7&tr2=1.8&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ly/gregorian-init.ly.diff?tr1=1.35&tr2=1.36&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ly/property-init.ly.diff?tr1=1.80&tr2=1.81&r1=text&r2=text

Patches:
Index: lilypond/ChangeLog
diff -u lilypond/ChangeLog:1.4203 lilypond/ChangeLog:1.4204
--- lilypond/ChangeLog:1.4203   Fri Oct 21 13:54:30 2005
+++ lilypond/ChangeLog  Fri Oct 21 14:07:47 2005
@@ -1,5 +1,9 @@
 2005-10-21  Han-Wen Nienhuys  <[EMAIL PROTECTED]>
 
+       * lily/grob.cc: remove is_empty()
+
+       * lily/grob-property.cc: remove add_to_list_property().
+
        * scripts/convert-ly.py (datadir): add prefix switching hack to
        .py too.
 
Index: lilypond/Documentation/user/changing-defaults.itely
diff -u lilypond/Documentation/user/changing-defaults.itely:1.140 
lilypond/Documentation/user/changing-defaults.itely:1.141
--- lilypond/Documentation/user/changing-defaults.itely:1.140   Fri Oct 21 
13:54:31 2005
+++ lilypond/Documentation/user/changing-defaults.itely Fri Oct 21 14:07:47 2005
@@ -1147,8 +1147,8 @@
      (self-alignment-X . 0)
      (self-alignment-Y . 0)
      (script-priority . 100)
-     (callbacks . ((stencil . ,Text_interface::print)
-                   (direction . ,Script_interface::calc_direction)))
+     (stencil . ,Text_interface::print)
+     (direction . ,Script_interface::calc_direction)
      (font-encoding . fetaNumber)
      (font-size . -5)          ; don't overlap when next to heads.
      (meta . ((class . Item)
Index: lilypond/Documentation/user/introduction.itely
diff -u lilypond/Documentation/user/introduction.itely:1.146 
lilypond/Documentation/user/introduction.itely:1.147
--- lilypond/Documentation/user/introduction.itely:1.146        Fri Oct 21 
13:54:31 2005
+++ lilypond/Documentation/user/introduction.itely      Fri Oct 21 14:07:47 2005
@@ -319,7 +319,7 @@
     (if (and (memq 'note-head-interface interfaces)
              (memq pos '(-2 -3 -5)))
         (begin
-          (ly:grob-set-callback! grob 'stencil Text_interface::print)
+          (ly:grob-set-property! grob 'stencil Text_interface::print)
           (ly:grob-set-property! grob 'font-family 'roman)
           (ly:grob-set-property!
            grob 'text
Index: lilypond/lily/grob-property.cc
diff -u lilypond/lily/grob-property.cc:1.41 lilypond/lily/grob-property.cc:1.42
--- lilypond/lily/grob-property.cc:1.41 Fri Oct 21 13:59:25 2005
+++ lilypond/lily/grob-property.cc      Fri Oct 21 14:07:47 2005
@@ -117,7 +117,7 @@
 #ifndef NDEBUG
 #include "protected-scm.hh"
 Protected_scm grob_property_callback_stack = SCM_EOL;
-bool debug_property_callbacks = 1;
+bool debug_property_callbacks = 0;
 #endif
 
 SCM
Index: lilypond/ly/bagpipe.ly
diff -u lilypond/ly/bagpipe.ly:1.7 lilypond/ly/bagpipe.ly:1.8
--- lilypond/ly/bagpipe.ly:1.7  Mon Oct 17 00:48:17 2005
+++ lilypond/ly/bagpipe.ly      Fri Oct 21 14:07:47 2005
@@ -6,10 +6,10 @@
   Sven Axelsson, the Murray Pipes & Drums of Gothenburg
   (http://www.murrays.nu)
   
-  $Id: bagpipe.ly,v 1.7 2005/10/17 00:48:17 hanwen Exp $
+  $Id: bagpipe.ly,v 1.8 2005/10/21 14:07:47 hanwen Exp $
 %}
 
-\version "2.7.13"
+\version "2.7.14"
 
 % Notes of the scale of the Great Highland Bagpipe. Extra high notes for 
bombarde.
 % Flat notes used mainly in some modern music.
@@ -38,14 +38,14 @@
 
 hideKeySignature = {
   % We normally don't want to show the key signature.
-  \override Staff.KeySignature #'callbacks #'stencil = ##f
+  \override Staff.KeySignature  #'stencil = ##f
   \set Staff.extraNatural = ##f
   \key d \major
   #(set-accidental-style 'forget)
 }
 showKeySignature = {
   % Show the key signature e.g. for BMW compatibility.
-  \override Staff.KeySignature #'callbacks #'stencil = 
#'Key_signature_interface::print
+  \override Staff.KeySignature  #'stencil = #'Key_signature_interface::print
   \set Staff.extraNatural = ##f
   \key d \major
   #(set-accidental-style 'forget)
Index: lilypond/ly/gregorian-init.ly
diff -u lilypond/ly/gregorian-init.ly:1.35 lilypond/ly/gregorian-init.ly:1.36
--- lilypond/ly/gregorian-init.ly:1.35  Mon Oct 17 00:48:17 2005
+++ lilypond/ly/gregorian-init.ly       Fri Oct 21 14:07:47 2005
@@ -1,4 +1,4 @@
-\version "2.7.13"
+\version "2.7.14"
 
 %%%%%%%%
 %%%%%%%% shortcuts common for all styles of gregorian chant notation
@@ -56,7 +56,7 @@
   \breathe
 }
 divisioMinima = {
-  \once \override BreathingSign #'callbacks #'stencil = 
#Breathing_sign::divisio_minima
+  \once \override BreathingSign  #'stencil = #Breathing_sign::divisio_minima
 
   % Workaround: add padding.  Correct fix would be spacing engine handle this.
   \once \override BreathingSign  #'extra-X-extent = #'(-1.0 . 0)
@@ -64,7 +64,7 @@
   \breathe
 }
 divisioMaior = {
-  \once \override BreathingSign #'callbacks #'stencil = 
#Breathing_sign::divisio_maior
+  \once \override BreathingSign  #'stencil = #Breathing_sign::divisio_maior
   \once \override BreathingSign  #'Y-offset-callbacks = #'()
 
   % Workaround: add padding.  Correct fix would be spacing engine handle this.
@@ -73,7 +73,7 @@
   \breathe
 }
 divisioMaxima = {
-  \once \override BreathingSign #'callbacks #'stencil = 
#Breathing_sign::divisio_maxima
+  \once \override BreathingSign  #'stencil = #Breathing_sign::divisio_maxima
   \once \override BreathingSign  #'Y-offset-callbacks = #'()
 
   % Workaround: add padding.  Correct fix would be spacing engine handle this.
@@ -82,7 +82,7 @@
   \breathe
 }
 finalis = {
-  \once \override BreathingSign #'callbacks #'stencil = 
#Breathing_sign::finalis
+  \once \override BreathingSign  #'stencil = #Breathing_sign::finalis
   \once \override BreathingSign  #'Y-offset-callbacks = #'()
 
   % Workaround: add padding.  Correct fix would be spacing engine handle this.
Index: lilypond/ly/property-init.ly
diff -u lilypond/ly/property-init.ly:1.80 lilypond/ly/property-init.ly:1.81
--- lilypond/ly/property-init.ly:1.80   Mon Oct 17 00:48:17 2005
+++ lilypond/ly/property-init.ly        Fri Oct 21 14:07:47 2005
@@ -1,6 +1,6 @@
 % property-init.ly
 
-\version "2.7.13"
+\version "2.7.14"
 
 stemUp = \override Stem  #'direction = #UP
 stemDown = \override Stem  #'direction = #DOWN 
@@ -52,7 +52,7 @@
 }
 
 setEasyHeads = \sequential {
-  \override NoteHead #'callbacks #'stencil = #Note_head::brew_ez_stencil
+  \override NoteHead  #'stencil = #Note_head::brew_ez_stencil
   \override NoteHead #'font-size = #-7
   \override NoteHead #'font-family = #'sans
   \override NoteHead #'font-series = #'bold
@@ -139,22 +139,19 @@
 arpeggio = #(make-music 'ArpeggioEvent)
 
 arpeggioUp = \sequential {
-  \revert Arpeggio #'callbacks % stencil
-
+  \revert Arpeggio  #'stencil
   \override Arpeggio  #'arpeggio-direction = #UP
 }
 arpeggioDown = \sequential {
-  \revert Arpeggio #'callbacks % stencil
-
+  \revert Arpeggio #'stencil
   \override Arpeggio  #'arpeggio-direction = #DOWN
 }
 arpeggioNeutral = \sequential {
-  \revert Arpeggio #'callbacks % stencil
-
+  \revert Arpeggio #'stencil
   \revert Arpeggio  #'arpeggio-direction
 }
 arpeggioBracket = \sequential {
-  \override Arpeggio #'callbacks #'stencil = #Arpeggio::brew_chord_bracket
+  \override Arpeggio #'stencil = #Arpeggio::brew_chord_bracket
 }
 
 glissando = #(make-music 'GlissandoEvent)


_______________________________________________
Lilypond-cvs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs

Reply via email to