From 498d0148b2c2611a8d96549527a3c14fa6e9de04 Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Fri, 12 Apr 2002 17:43:34 +0000 Subject: [PATCH] add some undocced properties. scm/grob-description.scm: idem. --- ChangeLog | 5 +++++ Documentation/regression-test.tely | 4 ++-- Documentation/user/refman.itely | 6 ++++++ VERSION | 4 ++-- lily/bass-figure.cc | 7 ------- lily/chord-name.cc | 2 +- lily/paper-column.cc | 2 +- lily/rest.cc | 2 +- lily/spacing-engraver.cc | 2 +- ly/engraver-init.ly | 2 -- scm/bass-figure.scm | 8 +++++++- scm/grob-description.scm | 5 ++--- scm/grob-property-description.scm | 3 +++ 13 files changed, 31 insertions(+), 21 deletions(-) delete mode 100644 lily/bass-figure.cc diff --git a/ChangeLog b/ChangeLog index 7e15defe40..e63be88edd 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-04-12 Han-Wen Nienhuys + + * lily/*.cc: add some undocced properties. + scm/grob-description.scm: idem. + 2002-04-12 Heikki Junes * lilypond-font-lock.el: Handle slurs \( and \), numbers, diff --git a/Documentation/regression-test.tely b/Documentation/regression-test.tely index dfb26c99f1..3960ac9306 100644 --- a/Documentation/regression-test.tely +++ b/Documentation/regression-test.tely @@ -84,7 +84,7 @@ Accidentals are currently in a development stage. @lilypondfile[printfilename]{glissando.ly} -@lilypondfile[printfilename]{fingering.ly} +@c @l ilypondfile[printfilename]{fingering.ly} @section Dynamics @@ -265,7 +265,7 @@ Grace note do weird things with timing. Fragile. @lilypondfile[printfilename]{spacing-stem-same-direction.ly} -@lilypondfile[printfilename]{spacing-individual-tuning.ly} +@c @l ilypondfile[printfilename]{spacing-individual-tuning.ly} @lilypondfile[printfilename]{spacing-note-flags.ly} diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely index d0a5b015b6..01b9b8b1e9 100644 --- a/Documentation/user/refman.itely +++ b/Documentation/user/refman.itely @@ -1109,12 +1109,18 @@ Set @code{height} to zero, to get horizontal beams: Here's how you'd specify a weird looking beam that instead of being horizontal, falls two staff spaces: + +[FIXME] + + @lilypond[fragment,relative,verbatim] \property Voice.Beam \set #'staff-position = #4 \property Voice.Beam \set #'height = #-4 [c8 c] @end lilypond +[TODO: doc autokneeing ? ] + @c TODO -> why this ref? Document? @cindex @code{neutral-direction} diff --git a/VERSION b/VERSION index 038f0d61bb..9917c63e22 100644 --- a/VERSION +++ b/VERSION @@ -1,8 +1,8 @@ PACKAGE_NAME=LilyPond MAJOR_VERSION=1 MINOR_VERSION=5 -PATCH_LEVEL=51 -MY_PATCH_LEVEL=hjj4 +PATCH_LEVEL=52 +MY_PATCH_LEVEL= # use the above to send patches: MY_PATCH_LEVEL is always empty for a diff --git a/lily/bass-figure.cc b/lily/bass-figure.cc deleted file mode 100644 index 7a6d962d81..0000000000 --- a/lily/bass-figure.cc +++ /dev/null @@ -1,7 +0,0 @@ -/* - bass-figure.cc - */ - - - - diff --git a/lily/chord-name.cc b/lily/chord-name.cc index 1180eea826..620075396f 100644 --- a/lily/chord-name.cc +++ b/lily/chord-name.cc @@ -65,5 +65,5 @@ Chord_name::brew_molecule (SCM smob) ADD_INTERFACE (Chord_name, "chord-name-interface", "generate a chord name", - "pitches chord inversion bass begin-of-line-visible"); + "pitches chord chord-name-function inversion bass begin-of-line-visible"); diff --git a/lily/paper-column.cc b/lily/paper-column.cc index c474e92af5..248af8cabf 100644 --- a/lily/paper-column.cc +++ b/lily/paper-column.cc @@ -128,4 +128,4 @@ Paper_column::brew_molecule (SCM p) ADD_INTERFACE (Paper_column, "paper-column-interface", "", - "between-cols when bounded-by-me shortest-playing-duration shortest-starter-duration"); + "between-cols between-system-string when bounded-by-me shortest-playing-duration shortest-starter-duration"); diff --git a/lily/rest.cc b/lily/rest.cc index c0bd01d93f..efd28765da 100644 --- a/lily/rest.cc +++ b/lily/rest.cc @@ -119,5 +119,5 @@ Rest::extent_callback (SCM smob, SCM ax) ADD_INTERFACE (Rest,"rest-interface", "a rest", - "style"); + "style minimum-beam-collision-distance"); diff --git a/lily/spacing-engraver.cc b/lily/spacing-engraver.cc index 1da3613a1f..9aa5e5421d 100644 --- a/lily/spacing-engraver.cc +++ b/lily/spacing-engraver.cc @@ -98,7 +98,7 @@ Spacing_engraver::acknowledge_grob (Grob_info i) Pointer_group_interface::add_grob (spacing_p_, ly_symbol2scm ("wishes"), i.grob_l_); } - if (to_boolean (i.grob_l_->get_grob_property ("non-rhythmic"))) + if (i.grob_l_->internal_has_interface (ly_symbol2scm ("lyric-syllable-interface"))) return; /* diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly index 2f27452f13..08bc3fd780 100644 --- a/ly/engraver-init.ly +++ b/ly/engraver-init.ly @@ -297,8 +297,6 @@ ChordNamesContext = \translator { MinimumVerticalExtent = ##f ExtraVerticalExtent = ##f VerticalExtent = ##f - - VerticalAxisGroup \override #'invisible-staff = ##t } diff --git a/scm/bass-figure.scm b/scm/bass-figure.scm index 63001abca2..3b84c6d7c9 100644 --- a/scm/bass-figure.scm +++ b/scm/bass-figure.scm @@ -31,6 +31,7 @@ + (define (brew-bass-figure grob) "Make a molecule for a Figured Bass grob" (let* ( @@ -39,7 +40,7 @@ (padding (ly-get-grob-property grob 'padding)) (kerning (ly-get-grob-property grob 'kern)) (thickness (* - (ly-get-paper-variable grob 'stafflinethickness) + (ly-get-paper-variable grob 'linethickness) (ly-get-grob-property grob 'thickness)) ) ) @@ -83,3 +84,8 @@ mol )) + +(ly-add-interface +'bass-figure-interface + "A bass figure, including bracket" + '(padding thickness )) diff --git a/scm/grob-description.scm b/scm/grob-description.scm index 7e4101ea20..2e848c7cdc 100644 --- a/scm/grob-description.scm +++ b/scm/grob-description.scm @@ -94,7 +94,7 @@ (padding . 0.1) (kern . 0.2) (thickness . 1.0) - (meta . ((interfaces . (text-interface self-alignment-interface font-interface)))) + (meta . ((interfaces . (text-interface bass-figure-interface self-alignment-interface font-interface)))) )) (Beam . ( @@ -384,7 +384,6 @@ (molecule-callback . ,Text_item::brew_molecule) (X-offset-callbacks . (,Self_alignment_interface::aligned_on_self)) (self-alignment-X . 0) - (non-rhythmic . #t) (word-space . 0.6) (ignore-length-mismatch . #f) (begin-alignment . 4) @@ -574,7 +573,7 @@ (edge-height . (1.0 . 1.0)) (shorten-pair . (0.0 . 0.0)) (thickness . 1.0) - (meta . ((interfaces . (piano-pedal-interface)))) + (meta . ((interfaces . (text-spanner-interface piano-pedal-interface)))) )) (RepeatSlash diff --git a/scm/grob-property-description.scm b/scm/grob-property-description.scm index 4d00c8a28a..b44ba232d5 100644 --- a/scm/grob-property-description.scm +++ b/scm/grob-property-description.scm @@ -453,3 +453,6 @@ columns. (grob-property-description 'grace-space-factor number? "space grace at this fraction of the increment.") (grob-property-description 'position-callbacks list? "list of functions set spanner positions.") +(grob-property-description 'chord-name-function procedure? "DOCME") +(grob-property-description 'minimum-beam-collision-distance number? +"Minimum distance to beam for a rest collision.") -- 2.39.5