*** empty log message ***

diff --git a/ly/declarations-init.ly b/ly/declarations-init.ly
index 9031f1e3be933f5709efd93c45d0438a1fc5dc64..a01e2c49fd7f7944e870bebc1916aa99e2780c3c 100644 (file)
--- a/ly/declarations-init.ly
+++ b/ly/declarations-init.ly
@@ -77,7 +77,10 @@ partCombineListener = \paper {
        \type "Recording_group_engraver"
        recordEventSequence = #notice-the-events-for-pc
     }
-    \context { \Score skipTypesetting = ##t }
+    \context {
+       \Score
+       skipTypesetting = ##t
+    }
 }
 
 #(set-part-combine-listener partCombineListener)

diff --git a/scm/define-grob-properties.scm b/scm/define-grob-properties.scm
index 83b2ae016f335ecb78eb992865480c99e8458403..722ba70dcf9f8fec4ef7524873f8daed53ef63be 100644 (file)
--- a/scm/define-grob-properties.scm
+++ b/scm/define-grob-properties.scm
@@ -420,6 +420,11 @@ expressed in global staffspace.")
 staff spaces, counted from the middle line.")
      (staffline-clearance ,ly:dimension? "How far away ties keep from
 staff lines.")
+     (stem-attachment-function ,procedure? "A function that calculates
+where a stem attaches to the note head? This is a fallback when this
+information is not specified in the font.  The function takes a grob
+and axis argument, and returns a (@var{x} . @var{y}) pair, specifying
+location in terms of note head bounding box.")
 
      (stem-end-position ,number? "Where does the stem end (the end is opposite to the support-head.")