Fix error message.
* lily/text-item.cc (ADD_INTERFACE): Remove align, magnify. Add
axis, extent.
* scm/grob-property-description.scm (magnify): Remove.
(extent, axis): Add.
+2002-11-04 Jan Nieuwenhuizen <janneke@gnu.org>
+
+ * scm/backend-documentation-lib.scm (check-dangling-properties):
+ Fix error message.
+
+ * lily/text-item.cc (ADD_INTERFACE): Remove align, magnify. Add
+ axis, extent.
+
+ * scm/grob-property-description.scm (magnify): Remove.
+ (extent, axis): Add.
+
2002-11-03 Han-Wen Nienhuys <hanwen@cs.uu.nl>
* scripts/convert-ly.py: more uniformization substitutions.
2002-11-03 Han-Wen Nienhuys <hanwen@cs.uu.nl>
* scripts/convert-ly.py: more uniformization substitutions.
ADD_INTERFACE (Text_item,"text-interface",
"A scheme markup text",
ADD_INTERFACE (Text_item,"text-interface",
"A scheme markup text",
- "text align baseline-skip lookup raise kern word-space magnify");
+ "text axis baseline-skip extent lookup raise kern word-space");
\consists "Phrasing_slur_engraver"
\consists "Slur_engraver"
\consists "Tie_engraver"
\consists "Phrasing_slur_engraver"
\consists "Slur_engraver"
\consists "Tie_engraver"
- \consists "New_tie_engraver"
+ %%\consists "New_tie_engraver"
\consists "Porrectus_engraver"
\consists "Tuplet_engraver"
\consists "A2_engraver"
\consists "Porrectus_engraver"
\consists "Tuplet_engraver"
\consists "A2_engraver"
(define (check-dangling-properties prop)
(if (not (object-property prop 'iface-marked))
(define (check-dangling-properties prop)
(if (not (object-property prop 'iface-marked))
- (error "\nDangling property: " prop))
- )
+ (error "\ngrob-property-description.scm: Can't find property:" prop)))
(map check-dangling-properties all-backend-properties)
(map check-dangling-properties all-backend-properties)
;; text: list of word
;; word: string + optional list of property
;; text: list of word
;; word: string + optional list of property
-;; property: align, kern, font (?), size
+;; property: axis, kern, font (?), size
(define chord::minor-major-vec (list->vector '(0 -1 -1 0 -1 -1 0)))
(define chord::minor-major-vec (list->vector '(0 -1 -1 0 -1 -1 0)))
(grob-property-description 'adjust-if-on-staffline boolean? "If this grob is on a staff line, adjust its appearance, so that it better fits into the staff. E.g., if set true on stem grobs, flares of mensural flags will always be aligned with the staff lines, regardless if the associated note head is printed on a staff line or inbetween.")
(grob-property-description 'after-line-breaking-callback procedure? "Procedure taking a grob as argument.
This procedure is called (using dependency resolution) after line breaking. Return value is ignored.")
(grob-property-description 'adjust-if-on-staffline boolean? "If this grob is on a staff line, adjust its appearance, so that it better fits into the staff. E.g., if set true on stem grobs, flares of mensural flags will always be aligned with the staff lines, regardless if the associated note head is printed on a staff line or inbetween.")
(grob-property-description 'after-line-breaking-callback procedure? "Procedure taking a grob as argument.
This procedure is called (using dependency resolution) after line breaking. Return value is ignored.")
-(grob-property-description 'align number? "the alignment of the text, 0 is horizontal, 1 is vertical.")
+(grob-property-description 'axis number? "the alignment of the text, 0 is horizontal, 1 is vertical.")
(grob-property-description 'align-dir ly:dir? "Which side to align? -1: left side, 0: around center of width, 1: right side.")
(grob-property-description 'alignment-done boolean? "boolean to administrate whether we've done the alignment already (to ensure that the process is done only once).")
(grob-property-description 'all-elements grob-list? "list of all grobs in this line. Needed for protecting grobs from GC.")
(grob-property-description 'align-dir ly:dir? "Which side to align? -1: left side, 0: around center of width, 1: right side.")
(grob-property-description 'alignment-done boolean? "boolean to administrate whether we've done the alignment already (to ensure that the process is done only once).")
(grob-property-description 'all-elements grob-list? "list of all grobs in this line. Needed for protecting grobs from GC.")
(grob-property-description 'expand-limit integer? "maximum number of measures expanded in church rests.")
(grob-property-description 'extra-X-extent number-pair? "enlarge in X dimension by this much, measured in staff space.")
(grob-property-description 'extra-Y-extent number-pair? "see @code{extra-Y-extent}.")
(grob-property-description 'expand-limit integer? "maximum number of measures expanded in church rests.")
(grob-property-description 'extra-X-extent number-pair? "enlarge in X dimension by this much, measured in staff space.")
(grob-property-description 'extra-Y-extent number-pair? "see @code{extra-Y-extent}.")
+(grob-property-description 'extent number-pair? "the extent of the text: (WIDTH . HEIGHT)")
(grob-property-description 'X-extent number-pair? "Store extent. internal use only. ")
(grob-property-description 'Y-extent number-pair? "Store extent. internal use only. ")
(grob-property-description 'extra-offset number-pair? "pair of reals
(grob-property-description 'X-extent number-pair? "Store extent. internal use only. ")
(grob-property-description 'Y-extent number-pair? "Store extent. internal use only. ")
(grob-property-description 'extra-offset number-pair? "pair of reals
and will have no effect.
")
(grob-property-description 'lookup symbol? "lookup method: 'value for plain text, 'name for character-name.")
and will have no effect.
")
(grob-property-description 'lookup symbol? "lookup method: 'value for plain text, 'name for character-name.")
-(grob-property-description 'magnify number? "the magnification factor. FIXME: doesn't work for feta fonts.")
(grob-property-description 'maximum-length number? "don't make Grob longer than this")
(grob-property-description 'maximum-rest-count integer? "kill off rests so we don't more than this number left.")
(grob-property-description 'measure-length ly:moment? "Length of a
(grob-property-description 'maximum-length number? "don't make Grob longer than this")
(grob-property-description 'maximum-rest-count integer? "kill off rests so we don't more than this number left.")
(grob-property-description 'measure-length ly:moment? "Length of a