From 99a19ece44d9225022befb6921c60a6fb7aa4b6c Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Sat, 14 Oct 2006 23:51:28 +0000 Subject: [PATCH] * scm/define-grob-interfaces.scm (string-finger-interface): add string-finger-interface * scm/define-grobs.scm (all-grob-descriptions): add 'string-names property. * scm/define-grobs.scm (all-grob-descriptions): add ScriptRow --- ChangeLog | 2 ++ scm/define-grob-interfaces.scm | 5 +++++ scm/define-grobs.scm | 2 +- 3 files changed, 8 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 5b48a3c217..3c54725feb 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,7 @@ 2006-10-15 Han-Wen Nienhuys + * scm/define-grob-interfaces.scm (string-finger-interface): add string-finger-interface + * lily/general-scheme.cc (LY_DEFINE): move ly_camel_case_to_lisp_identifier to here. Use vector iso. char[] diff --git a/scm/define-grob-interfaces.scm b/scm/define-grob-interfaces.scm index 59ff1593a7..cca3a16c7d 100644 --- a/scm/define-grob-interfaces.scm +++ b/scm/define-grob-interfaces.scm @@ -144,6 +144,11 @@ are interesting enough to maintain a hara-kiri staff." "A string number instruction" '()) +(ly:add-interface + 'string-finger-interface + "A string finger instruction" + '(digit-names)) + (ly:add-interface 'system-start-text-interface "A text at the beginning of a system." diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm index c7c1758a98..c36c950eb6 100644 --- a/scm/define-grobs.scm +++ b/scm/define-grobs.scm @@ -1561,7 +1561,7 @@ (font-shape . italic) (font-size . -4) ; don't overlap when next to heads. (meta . ((class . Item) - (interfaces . (string-number-interface + (interfaces . (string-finger-interface font-interface text-script-interface text-interface -- 2.39.2