X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-grobs.scm;h=eba1fe7d4a884681275ceeac0e15fe54dd4e1858;hb=bcbcf02fdbddaca8f090471055f98588b8c9b8ca;hp=0a47d53427453d00f19c525b6ae5e269a68bfe17;hpb=53ef525059b674cb00be84ccbcf99f17d727e0cb;p=lilypond.git

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 0a47d53427..eba1fe7d4a 100644
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -17,7 +17,6 @@
     (Accidental
      . (
 	(print-function . ,Accidental_interface::print)
-	(font-family . music)
 	(cautionary-style . parentheses)
 	(after-line-breaking-callback . ,Accidental_interface::after_line_breaking)		(meta . ((interfaces . (item-interface accidental-interface font-interface))))
 	))
@@ -78,7 +77,7 @@
 	(X-extent-callback . ,Note_head::extent)
 	(Y-extent-callback . ,Note_head::extent)
 	(Y-offset-callbacks  . (,Staff_symbol_referencer::callback))
-	(meta . ((interfaces . (font-interface note-head-interface ambitus-interface staff-symbol-referencer-interface item-interface ))))
+	(meta . ((interfaces . (font-interface note-head-interface ambitus-interface staff-symbol-referencer-interface rhythmic-head-interface item-interface ))))
 	))
     
     (Arpeggio
@@ -351,21 +350,20 @@
 	(meta . ((interfaces . (font-interface staff-symbol-referencer-interface dots-interface item-interface ))))
 	))
 
-    (DoublePercentRepeat .
-			 (
-			  (print-function . ,Percent_repeat_item_interface::double_percent)
-			  (breakable . #t)
-			  (slope . 1.0)
-			  (font-encoding . fetaMusic)
-			  (width . 2.0)
-			  (thickness . 0.48)
-			  (break-align-symbol . staff-bar)
-			  (break-visibility . ,begin-of-line-invisible)
-			  (meta . ((interfaces . (font-interface
-						  break-aligned-interface
-						  percent-repeat-interface item-interface ))))
-			 ))
-
+    (DoublePercentRepeat
+     . (
+	(print-function . ,Percent_repeat_item_interface::double_percent)
+	(breakable . #t)
+	(slope . 1.0)
+	(font-encoding . fetaMusic)
+	(width . 2.0)
+	(thickness . 0.48)
+	(break-align-symbol . staff-bar)
+	(break-visibility . ,begin-of-line-invisible)
+	(meta . ((interfaces . (font-interface
+				break-aligned-interface
+				percent-repeat-interface item-interface ))))
+	))
     (DynamicText
      . (
 	(Y-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
@@ -624,7 +622,6 @@
 	(thick-thickness . 6.6)
 	(hair-thickness . 2.0)
 	(padding . 1)
-	(font-encoding . fetaMusic)
 	(meta . ((interfaces . (multi-measure-rest-interface multi-measure-interface rest-interface font-interface staff-symbol-referencer-interface))))
 	))
     
@@ -702,7 +699,7 @@
 	(Y-extent-callback . #f)			 
 	(print-function . ,Line_spanner::print)
 	(after-line-breaking-callback . ,Line_spanner::after_line_breaking)
-	(meta . ((interfaces . (line-spanner-interface spanner-interface))))
+	(meta . ((interfaces . (line-spanner-interface line-interface spanner-interface))))
 	))
 
     (NoteName
@@ -977,7 +974,6 @@
 	;; FIXME this should come from 'lengths
 
 	(beamed-lengths . (3.26 3.26 1.5))
-;	(beamed-lengths . (3.5 3.5 3.5 4.5 5.0))
 	
 	;; We use the normal minima as minimum for the ideal lengths,
 	;; and the extreme minima as abolute minimum length.