Build fix

diff --git a/ChangeLog b/ChangeLog
index 6cc40fb4481b8d0264fe3b6d3ab51d4fe7b07310..b0bd8fc337886e214ab2a82d6f5608c19bb65253 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -28,6 +28,10 @@
 
        * lily/source-file.cc: put multibyte var inside #if clause
 
+       * scm/define-grob-interfaces.scm:
+       * scm/define-grob-properties.scm:
+       Build fix (string-fret-finger-combinations)
+
 2006-10-26  Joe Neeman  <joeneeman@gmail.com>
 
        * lily/system.cc (get_paper_system): 

diff --git a/scm/define-grob-interfaces.scm b/scm/define-grob-interfaces.scm
index afb72d6999725b6a9be6e7c06ed07ac750029457..7d4ca0f34db32b361e1b62c4caf8a282f2b7b3b7 100644 (file)
--- a/scm/define-grob-interfaces.scm
+++ b/scm/define-grob-interfaces.scm
@@ -49,7 +49,8 @@
  'fret-diagram-interface
  "A fret diagram"
  '(align-dir barre-type dot-color dot-radius finger-code fret-count
-  label-dir number-type size string-count thickness))
+  label-dir number-type size string-count
+  string-fret-finger-combinations thickness))
 
 (ly:add-interface
  'grace-spacing-interface

diff --git a/scm/define-grob-properties.scm b/scm/define-grob-properties.scm
index a9f3c994d231a460a288f706b0ed2a0cb67f79f2..029d73c58f7fdaa0a4c2a0cc47d4bbfee2ec7868 100644 (file)
--- a/scm/define-grob-properties.scm
+++ b/scm/define-grob-properties.scm
@@ -390,7 +390,6 @@ object.")
      (size ,number? "Size of object, relative to standard size.")
      (slope ,number? "The slope of this object.")
      (slur-padding ,number? "Extra distance between slur and script.")
-     (string-fret-finger-combinations ,list? "List consisting of (string-number fret-number finger-number) entries." )
      (space-alist ,list? "A table that specifies distances between
 prefatory items, like clef and time-signature. The format is an alist
 of spacing tuples: @code{(@var{break-align-symbol} @var{type}
@@ -426,6 +425,7 @@ separately, but put before musical columns.")
      (strict-grace-spacing ,boolean? "If set, grace notes 
 are not spaced separately, but put before musical columns.")
      (string-count ,integer? "The number of strings in a fret diagram.")
+     (string-fret-finger-combinations ,list? "List consisting of (string-number fret-number finger-number) entries.")
      (stroke-style ,string? "set to \"grace\" to turn stroke through flag on.")
      
      (style ,symbol? "This setting determines in what style a grob is