OLD | NEW |
1 ;;;; This file is part of LilyPond, the GNU music typesetter. | 1 ;;;; This file is part of LilyPond, the GNU music typesetter. |
2 ;;;; | 2 ;;;; |
3 ;;;; Copyright (C) 1998--2019 Han-Wen Nienhuys <hanwen@xs4all.nl> | 3 ;;;; Copyright (C) 1998--2019 Han-Wen Nienhuys <hanwen@xs4all.nl> |
4 ;;;; Jan Nieuwenhuizen <janneke@gnu.org> | 4 ;;;; Jan Nieuwenhuizen <janneke@gnu.org> |
5 ;;;; | 5 ;;;; |
6 ;;;; LilyPond is free software: you can redistribute it and/or modify | 6 ;;;; LilyPond is free software: you can redistribute it and/or modify |
7 ;;;; it under the terms of the GNU General Public License as published by | 7 ;;;; it under the terms of the GNU General Public License as published by |
8 ;;;; the Free Software Foundation, either version 3 of the License, or | 8 ;;;; the Free Software Foundation, either version 3 of the License, or |
9 ;;;; (at your option) any later version. | 9 ;;;; (at your option) any later version. |
10 ;;;; | 10 ;;;; |
(...skipping 533 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
544 (interfaces . (chord-name-interface | 544 (interfaces . (chord-name-interface |
545 font-interface | 545 font-interface |
546 outside-staff-interface | 546 outside-staff-interface |
547 rhythmic-grob-interface | 547 rhythmic-grob-interface |
548 text-interface)))))) | 548 text-interface)))))) |
549 | 549 |
550 (Clef | 550 (Clef |
551 . ( | 551 . ( |
552 (avoid-slur . inside) | 552 (avoid-slur . inside) |
553 (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-a
nchor) | 553 (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-a
nchor) |
554 (break-align-anchor-alignment . ,RIGHT) | 554 (break-align-anchor-alignment . 2) |
555 (break-align-symbol . clef) | 555 (break-align-symbol . clef) |
556 (break-visibility . ,begin-of-line-visible) | 556 (break-visibility . ,begin-of-line-visible) |
557 (extra-spacing-height . ,pure-from-neighbor-interface::extra-spacing-hei
ght-at-beginning-of-line) | 557 (extra-spacing-height . ,pure-from-neighbor-interface::extra-spacing-hei
ght-at-beginning-of-line) |
558 (glyph-name . ,ly:clef::calc-glyph-name) | 558 (glyph-name . ,ly:clef::calc-glyph-name) |
559 (non-musical . #t) | 559 (non-musical . #t) |
560 (space-alist . ((cue-clef . (extra-space . 2.0)) | 560 (space-alist . ((cue-clef . (extra-space . 2.0)) |
561 (staff-bar . (extra-space . 0.7)) | 561 (staff-bar . (extra-space . 0.7)) |
562 (ambitus . (extra-space . 1.15)) | 562 (ambitus . (extra-space . 1.15)) |
563 (key-cancellation . (minimum-space . 3.5)) | 563 (key-cancellation . (minimum-space . 3.5)) |
564 (key-signature . (minimum-space . 3.5)) | 564 (key-signature . (minimum-space . 3.5)) |
(...skipping 2344 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2909 ;; make sure that \property Foo.Bar =\turnOff doesn't complain | 2909 ;; make sure that \property Foo.Bar =\turnOff doesn't complain |
2910 | 2910 |
2911 (for-each (lambda (x) | 2911 (for-each (lambda (x) |
2912 ;; (display (car x)) (newline) | 2912 ;; (display (car x)) (newline) |
2913 | 2913 |
2914 (set-object-property! (car x) 'translation-type? ly:grob-properties?
) | 2914 (set-object-property! (car x) 'translation-type? ly:grob-properties?
) |
2915 (set-object-property! (car x) 'is-grob? #t)) | 2915 (set-object-property! (car x) 'is-grob? #t)) |
2916 all-grob-descriptions) | 2916 all-grob-descriptions) |
2917 | 2917 |
2918 (set! all-grob-descriptions (sort all-grob-descriptions alist<?)) | 2918 (set! all-grob-descriptions (sort all-grob-descriptions alist<?)) |
OLD | NEW |