From: Jan Nieuwenhuizen Date: Sun, 18 Mar 2001 13:46:40 +0000 (+0100) Subject: patch::: 1.3.139.jcn1 X-Git-Tag: release/1.3.140~6 X-Git-Url: https://git.donarmstrong.com/lilypond.git?a=commitdiff_plain;h=87932dcb8ec24b069bbce8edbb76f5258ca4ff1b;p=lilypond.git patch::: 1.3.139.jcn1 1.3.139.jcn1 ============ * Allow markup text for crecscendoText and decrescendoText. * Changed part combiner's a due text: `a2 to a2. * Renamed FollowThread into VoiceFollower, followThread into followVoice. * lilypond-book: changed nonfragment into nofragment * Bugfix: info direntries. * Bugfix; don't create RhythmicStaff if asking for Staff. * Automated fixing of info structure. Build now stops on info errors. This should robustify documentation and website builds. To undo this, remove the target `info: check-info' from Documentation/user/GNUmakefile. * Move Multi_measure_rest up/down in combined parts. * Cleanups for ledgered rests. 1.3.139 ======= --- diff --git a/CHANGES b/CHANGES index 482f4c356b..22873b892a 100644 --- a/CHANGES +++ b/CHANGES @@ -1,3 +1,30 @@ +1.3.139.jcn1 +============ + +* Allow markup text for crecscendoText and decrescendoText. + +* Changed part combiner's a due text: `a2 to a2. + +* Renamed FollowThread into VoiceFollower, followThread into +followVoice. + +* lilypond-book: changed nonfragment into nofragment + +* Bugfix: info direntries. + +* Bugfix; don't create RhythmicStaff if asking for Staff. + +* Automated fixing of info structure. Build now stops on info errors. +This should robustify documentation and website builds. To undo this, +remove the target `info: check-info' from Documentation/user/GNUmakefile. + +* Move Multi_measure_rest up/down in combined parts. + +* Cleanups for ledgered rests. + +1.3.139 +======= + 1.3.138.jcn1 ============ diff --git a/Documentation/regression-test.tely b/Documentation/regression-test.tely index 91fc390181..e83d688707 100644 --- a/Documentation/regression-test.tely +++ b/Documentation/regression-test.tely @@ -21,6 +21,8 @@ and documenting bugfixes. @lilypondfile[printfilename]{rest.ly} +@lilypondfile[printfilename]{rest-ledger.ly} + @lilypondfile[printfilename]{noteheadstyle.ly} @lilypondfile[printfilename]{easy-notation.ly} diff --git a/Documentation/user/GNUmakefile b/Documentation/user/GNUmakefile index db0ed79d93..54df9c3632 100644 --- a/Documentation/user/GNUmakefile +++ b/Documentation/user/GNUmakefile @@ -5,7 +5,6 @@ depth=../.. LATEX_FILES =$(wildcard *.latex) - # todo: add latex. DVI_FILES = $(addprefix $(outdir)/, $(TELY_FILES:.tely=.dvi)) @@ -22,8 +21,18 @@ INFO_FILES = $(addprefix $(outdir)/, lilypond.info lilypond-internals.info) STEPMAKE_TEMPLATES=tex texinfo documentation LOCALSTEPMAKE_TEMPLATES=lilypond ly +# Hmm, what about? +# local-dist: check-info + +info: check-info + include $(depth)/make/stepmake.make +# Ugh,ugh. +# emacs cannot fix the menu structure when @mbinclude is used +# lilypond.tely uses mbinclude +TEXINFO_SOURCES := $(filter-out lilypond.tely, $(TEXINFO_SOURCES)) + dvi: $(DVI_FILES) ps: $(PS_FILES) @@ -37,7 +46,7 @@ $(outdir)/%.info: $(outdir)/%.texi default: # Info is now built by default via texinfo-rules. -# We must build them by default, otherwise they get built during make install +# We must build them by defaulbt, otherwise they get built during make install info: $(INFO_FILES) @@ -50,13 +59,13 @@ SPLITTING_MAKEINFO = $(shell makeinfo --version | egrep '4.0((.jcn[2,3])|a)') # Generic rule using % twice not possible? # $(outdir)/%/%.html: $(outdir)/%.texi $(outdir)/lilypond/lilypond.html: $(outdir)/lilypond.texi - -$(MAKEINFO) --force --output=$@ --html $< + $(MAKEINFO) --output=$@ --html $< -cp -f $(outdir)/*.png $(outdir)/lilypond -cp -f $(outdir)/lilypond/index.html $@ $(deep-footify) $(shell find $(outdir)/$(*F)/*.html) $(outdir)/lilypond-internals/lilypond-internals.html: $(outdir)/lilypond-internals.texi - -$(MAKEINFO) --force --output=$@ --html $< + $(MAKEINFO) --output=$@ --html $< -cp -f $(outdir)/*.png $(outdir)/lilypond-internals -cp -f $(outdir)/lilypond-internals/index.html $@ $(deep-footify) $(shell find $(outdir)/$(*F)/*.html) diff --git a/Documentation/user/development.itexi b/Documentation/user/development.itexi index 9165ff38ab..b7a994b97c 100644 --- a/Documentation/user/development.itexi +++ b/Documentation/user/development.itexi @@ -6,10 +6,11 @@ @chapter Development @menu -* CodingStyle:: -* Making patches:: -* Localisation:: -* Helping with development:: +* CodingStyle:: +* Making patches:: +* Localisation:: +* Helping with development:: +* ETF format:: @end menu @node CodingStyle diff --git a/Documentation/user/glossary.tely b/Documentation/user/glossary.tely index 48f69da042..3e5c068be4 100644 --- a/Documentation/user/glossary.tely +++ b/Documentation/user/glossary.tely @@ -4,8 +4,8 @@ @c @pagesizes 10.3in @c @everyheading @| @thispage @| -@evenheading @thispage @| @| -@oddheading @| @| @thispage @| +@c @evenheading @thispage @| @| +@c @oddheading @| @| @thispage @| @itemize diff --git a/Documentation/user/lilypond-book.itely b/Documentation/user/lilypond-book.itely index b780a17401..d94fda2b8d 100644 --- a/Documentation/user/lilypond-book.itely +++ b/Documentation/user/lilypond-book.itely @@ -203,7 +203,7 @@ There work just as expected. Look at @file{mb-latex.tex} for details. @item multiline linewidth = textwidth @item fragment -@item nonfragment +@item nofragment Override @command{lilypond-book} autodetection of what type of code is in the lilypond block, voice contents or complete code. @end table diff --git a/Documentation/user/lilypond.tely b/Documentation/user/lilypond.tely index f6e5d1882d..975ec859fa 100644 --- a/Documentation/user/lilypond.tely +++ b/Documentation/user/lilypond.tely @@ -6,7 +6,7 @@ @dircategory GNU music project @direntry @c ;; prepend GNU for dir, must be unique -* GNU LilyPond (lilypond). The GNU music typesetter. +* GNU LilyPond: (lilypond). The GNU music typesetter. @c * install-info: (texinfo)Invoking install-info. Update info/dir entries. @c * texi2dvi: (texinfo)Format with texi2dvi. Print Texinfo documents. @end direntry diff --git a/Documentation/user/macros.itexi b/Documentation/user/macros.itexi index b6110ced05..6d9bf7c2c8 100644 --- a/Documentation/user/macros.itexi +++ b/Documentation/user/macros.itexi @@ -28,6 +28,10 @@ @macro c__ {word} \word\ +@menu +* \word\:: +@end menu + @node \word\ @subsection \word\ @end macro diff --git a/Documentation/user/preface.itely b/Documentation/user/preface.itely index 7b4ef875ee..9211d00fa3 100644 --- a/Documentation/user/preface.itely +++ b/Documentation/user/preface.itely @@ -2,29 +2,65 @@ @node Preface @chapter Preface -Some six years ago I was in the EJE (Eindhoven Youth Orchestra), and -Jan, one of the cranked violists told me about the grand new project he -was working on. It was an automated system for printing music (to be -precise, it was MPP, a preprocessor for MusiXTeX). Accidentally, I also -wanted to print out some parts from a score, so I started looking at his -software, and quickly got hooked. The rest is, as they say, history. + +It must have been during a rehearsal of the EJE (Eindhoven Youth +Orchestra), somewhere in 1994 that Jan, one of the cranked violists +told Han-Wen, one of the distorted french horn players, about the +grand new project he was working on. It was an automated system for +printing music (to be precise, it was MPP, a preprocessor for +MusiXTeX). As it happened, Han-Wen accidentally wanted to print out +some parts from a score, so he started looking at the software, and he +quickly got hooked. We soon realised that MPP was fundamentally +broken by design and it slowly died during 1995. We debated a lot +about the requirements to an inputformat, but that didn't produce any +new code. In 1996, Han-Wen started LilyPond. This time, Jan got +sucked into Han-Wen's new project. The rest is, as they say, history. You're reading the preface of the manual for LilyPond 1.4, which is in all honesty, the first release of LilyPond that combines stability, -flexibility and good documentation. I hope you have as much fun in using -LilyPond as I had when hacking it. +flexibility and good documentation. We hope you will have as much fun +in using LilyPond as we have when hacking it. + +This manual was written to help you learn LilyPond, but as you might +imagine, we don't have much to learn about it. Therefore, we can't +really judge whether the manual is clear for a newbie, but maybe you +can! So, should you find any part of the manual vague or outdated, +please tell us your suggestions: if you don't, we'll never know. + +Han-Wen and Jan + +Utrecht/Amsterdam, The Netherlands, March 2001. + -This manual was written to help you learn lily, but as you might -imagine, I don't have anything learn about it. It's hard for me as a -writer to judge whether the manual is clear for a newbie, but you can! -So, should you find any part of the manual vague or outdated, please let -us know: if you don't tell us, we'll never know. +@ignore +appendix? +[details from lilypond-1.0.0] -Han-Wen Nienhuys +GNU LilyPond's roots lie in MPP, a preprocessor to the rather arcane +MusiXTeX macro package for TeX. A friend of mine, Jan Nieuwenhuizen +wrote the first 44 versions (0.01 to 0.44), then his program caught my +attention, and I was slowly sucked in to the interesting problem of +easily producing beautifully printed music. I contributed some +code. We soon realised that MPP's design was too fundamentally broken +to be repaired, so it was decided to rewrite MPP. We debated a lot about +the requirements to an inputformat (fall 1995). I sat down and started +with a parser-first, bottom-up rewrite called mpp95 (which totally +failed, obviously). -Utrecht, The Netherlands, March 2001. +After long and hard thinking, I came up with an algorithm for the +horizontal spacing of multiple staffs (april 1996) I coded it (and did +not test it). After starting with this fundamental piece, I slowly +added the stages which come before spacing, and after. A half year +later, I had a first working version, (october 1996). I announced +Patchlevel 0.0.7 (or 8) to the mutex list after asking some technical +details on spacing; it was downloaded approximately 4 times. Then I +got the hang of it, and in the subsequent two months, I coded until it +had doubled in size (pl 23). +Most the other history is described in the NEWS file. The first large +scale release (0.1) was done after approximately 78 patchlevels on +August 1, 1997. -[preface jcn here? ] +@end ignore diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely index 5e7d8f9b5c..00c006f2f5 100644 --- a/Documentation/user/refman.itely +++ b/Documentation/user/refman.itely @@ -7,12 +7,6 @@ @c before saving changes -@ignore - TODO: - -@end ignore - - @macro refbugs @unnumberedsubsec Bugs @@ -139,7 +133,7 @@ The verbose syntax for pitch specification is @example \pitch @var{scmpitch} @end example - +9 @var{scmpitch} is a pitch scheme object, see @ref{Pitch data type}. In Note and Chord mode, pitches may be designated by names. The default @@ -659,7 +653,7 @@ settings. @cindex Polyphony [TODO: collisions, rest-collisinos, voiceX identifiers, how to -which contexts to instantiate.] +which contexts to instantiate. some small examples? ] @table @code @@ -702,6 +696,23 @@ Aand for ties use @code{\tieDown}, @code{\tieUp}. +@cindex @code{\voiceOne} +@cindex @code{\voiceTwo} +@cindex @code{\voiceThree} +@cindex @code{\voiceFour} +@cindex @code{\oneVoice} +@cindex @code{\shiftOn} +@cindex @code{\shiftOff} + +If two voices sharing one staff have the same stem directions, their +note heads may collide. You can shift the note heads of one voice by +setting @code{\shiftOn}. This can be undone by setting +@code{\shiftOff}. + +For simple polyphonic music, shorthands are available that combine +directions and shift settings: @code{\voiceOne}, @code{\voiceTwo}, +@code{\voiceThree}, @code{\voiceFour} and @code{\oneVoice}. + @node Beaming @section Beaming @@ -824,9 +835,31 @@ control the number of beams through the properties @end quotation @cindex @code{stemRightBeamCount} +The beam symbol can be tweaked through @code{Voice.Beam}'s +grob-properties @code{height} and @code{staff-position}, +in staff-spaces. + +Set @code{height} to zero, to get horizontal beams: + +@quotation +@lilypond[fragment,relative,verbatim] + \property Voice.Beam \set #'direction = #1 + \property Voice.Beam \set #'height = #0 + [a''8 e' d c] +@end lilypond +@end quotation -[TODO: explain common tweaks.] +Here's how you'd specify a weird looking beam that instead of being +horizontal, falls two staff spaces: +@quotation +@lilypond[fragment,relative,verbatim] + \property Voice.Beam \set #'staff-position = #2 + \property Voice.Beam \set #'height = #-2 + [c'8 c] +@end lilypond +@end quotation +@cindex @code{default-neutral-direction} @node Expressive marks @section Expressive marks @@ -837,6 +870,7 @@ control the number of beams through the properties * Phrasing slur:: * Breath marks:: * Tempo:: +* Text spanner:: @end menu @node Slur @@ -886,45 +920,25 @@ stems might look better: Similarly, the curvature of a slur is adjusted to stay clear of note heads and stems. When that would increase the curvature too much, the slur is reverted to its default shape. The threshold for this decision -is in @code{Voice.Slur}'s grob-property @code{beautiful}. In some -cases, you may prefer curved slurs to vertically moved ones. You can +is in @code{Voice.Slur}'s grob-property @code{beautiful}. It is loosely +related to the enclosed area between the slur and the notes. Usually, +the default setting works well, but in some cases you may prefer a +curved slur when LilyPond decides for a vertically moved one. You can express this by increasing the @code{beautiful} value: -[hoe gedefd?? wat betekent beautiful = X?] +@lilypond[verbatim,singleline,relative] + \property Voice.Beam \override #'direction = #-1 + \property Voice.Slur \override #'direction = #1 + c'16( a' f' a a f a, )c, + c( a' f' a a f d, )c + \property Voice.Slur \override #'beautiful = #5.0 + c( a' f' a a f d, )c +@end lilypond -[dit voorbeeld is te lang: junken, of inkorten] +@refbugs -@quotation -@lilypond[verbatim,singleline] -\score { - \notes \context PianoStaff < - \time 6/4; - \context Staff=up { s1 * 6/4 } - \context Staff=down < - \clef bass; - \autochange Staff \context Voice - \notes \relative c { - d,8( a' d f a d f d a f d )a - } - > - > - \paper { - \translator { - \VoiceContext - Slur \override #'beautiful = #5.0 - Slur \override #'direction = #1 - Stem \override #'direction = #-1 - autoBeamSettings \override #'(end * * * *) - = #(make-moment 1 2) - } - \translator { - \PianoStaffContext - VerticalAlignment \override #'threshold = #'(5 . 5) - } - } -} -@end lilypond -@end quotation +The definition for @code{beautiful} is vague, the default setting is +experimental computer science. @cindex Adusting slurs @@ -1565,11 +1579,6 @@ are squashed, and the staff itself looks has a single staff line: @end lilypond - -[TODO: explain perc notation, if it's finished in time.] - - - @c . {Piano music} @node Piano music @section Piano music @@ -1585,7 +1594,7 @@ other pianistic peculiarities. * Manual staff switches:: * Pedals:: * Arpeggio:: -* Follow Thread:: +* VoiceFollower:: @end menu @@ -1711,26 +1720,24 @@ This command creates @code{Arpeggio} grobs. connected arpeggios and unconnected arpeggios at the same time. -@c . {Follow Thread} -@node Follow Thread -@subsection Follow Thread +@c . {VoiceFollower} +@node VoiceFollower +@subsection VoiceFollower -@cindex follow thread +@cindex follow voice @cindex staff switching @cindex cross staff -[todo: figure out different name, eg. voice line, switch indicator ? ] - -@cindex @code{followThread} +@cindex @code{followVoice} Whenever a voice switches to another staff a line connecting the notes can be printed automatically. This is enabled if the property -@code{PianoStaff.followThread} is set to true: +@code{PianoStaff.followVoice} is set to true: @quotation @lilypond[fragment,relative,verbatim] \context PianoStaff < - \property PianoStaff.followThread = ##t + \property PianoStaff.followVoice = ##t \context Staff \context Voice { c'1 \translator Staff=two @@ -2338,7 +2345,7 @@ Automatic part combining is used to merge two parts of music onto on staff in an intelligent way. It is aimed primarily at typesetting Hymns and orchestral scores. When the two parts are identical for a period of time, only one is shown. In places where the two parts differ, stem -directions are set automatically. Also, soli and @`{a} due parts can be +directions are set automatically. Also, soli and @emph{a due} parts can be identified and marke. The syntax for part combining is @@ -2371,20 +2378,15 @@ one voice, as common for wind parts in orchestral scores: Notice that the first @code{g} appears only once, although it was specified twice (once in each Thread). Also note that stem, slur and tie directions are set automatically, depending whether there is a solo or -unisono. - -There is actually a third engraver involved in part combining; the -@code{Voice_devnull_engraver}. This one takes care of removing -redundant spanners such as beams, slurs, ties, crescendi, etc. Note that -the Thread called one always gets up stems, and "solo", while @code{two} -always gets down stems and "Solo II". +unisono. The Thread called @code{one} always gets up stems, and "solo", +while @code{two} always gets down stems and "Solo II". If you just want the splitting of Threads and setting of directions, and not the textual markings, you may set the property @var{soloADue} to false. There are a number of other properties that you can use to tweak the behavior of part combining, refer to the automatically generated documentation. Look for @code{Thread_devnull_engraver} -@code{Voice_engraver} and @code{A2_engraver}. +@code{Voice_devnull_engraver} and @code{A2_engraver}. @cindex @code{Thread_devnull_engraver} @cindex @code{Voice_engraver} @@ -2394,7 +2396,9 @@ documentation. Look for @code{Thread_devnull_engraver} @subsection Hara-kiri staffs -[TODO]@footnote{Harakiri, also called Seppuku, is the ritual suicide of +[TODO] + +@footnote{Harakiri, also called Seppuku, is the ritual suicide of the Japanese Samourai warriors.} @@ -3123,7 +3127,7 @@ To use it, you need the following software @itemize @item @uref{ftp://ftp.math.berkeley.edu/pub/Software/TeX/xdvi.tar.gz,plain -Xdvi} version 22.28 or better. +Xdvi} version 22.36 or newer. Note that most @TeX{} distributions ship with xdvik, which is a different and less well maintained program. To find out which xdvi you @@ -3148,29 +3152,30 @@ In the emacs startup file (usually @file{~/.emacs}), add the following If you want emacs to jump to the exact spot (and not just the line) on a click, you must enable column positioning. To do so, you need to patch -emacsclient. Apply @uref{this patch, -http://www.cs.uu.nl/~hanwen/public/software/emacsclient-column} to -@file{emacsclient.c} and @file{server.el} from the emacs source -code. Stick the compiled emacsclient into a bin directory, and put -@file{server.el} into a elisp directory +emacsclient. Apply @file{emacsclient.patch} (included with the source +package) to @file{emacsclient.c} and @file{server.el} from the emacs +source code. Recompile and stick the recompiled emacsclient into a bin +directory, and put @file{server.el} into a elisp directory (eg. @file{~/usr/share/emacs/}). Add the following to your @file{.emacs} -init file, before invoking server-start. +init file, beifore invoking server-start. @example - (setq load-path (cons (concat (getenv "HOME") "/usr/share/emacs") - load-path)) + (setq load-path (cons "~/usr/share/emacs" load-path)) @end example Xdvi must be configured to use the emacs editor. Before starting, set -the environment variable @code{XEDITOR} to @code{emacsclient --no-wait -+%c:%l %f}. Xdvi also must be configured to find the fonts. Refer to the +the environment variable @code{XEDITOR} to +@example +emacsclient --no-wait +%c:%l %f +@end example +Xdvi also must be configured to find the fonts. Refer to the xdvi documentation for more information. -[TODO: is that so?] +When viewing, control-mousebutton 1 will take you to the originating +line and column. Control-mousebutton 2 will show all clickable boxes. -When viewing, control-mousebutton 1 will take you to the correct -line/column. Control-mousebutton 2 will show all clickable boxes. +@refbugs When you convert the TeX file to PostScript using dvips, dvips will complain about not finding @code{src:X:Y} files. Those complaints are diff --git a/Documentation/user/tricks.itely b/Documentation/user/tricks.itely index cc5c4ed48a..6dd0de0430 100644 --- a/Documentation/user/tricks.itely +++ b/Documentation/user/tricks.itely @@ -68,32 +68,6 @@ extension can be controlled through @code{Voice.Stem}'s grob-property @end lilypond @end quotation -The beam symbol can be tweaked through @code{Voice.Beam}'s -grob-properties @code{height} and @code{staff-position}, -in staff-spaces. - -Set @code{height} to zero, to get horizontal beams: - -@quotation -@lilypond[fragment,relative,verbatim] - \property Voice.Beam \set #'direction = #1 - \property Voice.Beam \set #'height = #0 - [a''8 e' d c] -@end lilypond -@end quotation - -Here's how you'd specify a weird looking beam that instead of being -horizontal, falls two staff spaces: - -@quotation -@lilypond[fragment,relative,verbatim] - \property Voice.Beam \set #'staff-position = #2 - \property Voice.Beam \set #'height = #-2 - [c'8 c] -@end lilypond -@end quotation -@cindex @code{default-neutral-direction} - The direction of a perfectly centred beams can be controlled through @code{Voice.Beam}'s grob-property @code{default-neutral-direction} diff --git a/Documentation/user/tutorial.itely b/Documentation/user/tutorial.itely index 291ea571b5..c6e2983efe 100644 --- a/Documentation/user/tutorial.itely +++ b/Documentation/user/tutorial.itely @@ -4,7 +4,7 @@ @chapter Tutorial @menu -* Introduction:: Introduction +* Introduction:: * Running LilyPond:: Getting started * The first tune:: The first tune * Lyrics and chords:: Lyrics and chords @@ -1482,6 +1482,7 @@ tromboII = \notes\relative c'' @{ timpani = \notes\relative c, @{ \times 2/3 @{ f4 f f @} \times 4/5 @{ as8 as as as as @} + R1 @} corno = \notes\relative c' @{ bes4 d f, bes d f, bes d @@ -1560,10 +1561,14 @@ conductor's score. @} \translator@{ \VoiceContext - \remove "Rest_engraver"; + \remove "Rest_engraver"; + \consists "Multi_measure_rest_engraver"; + \consists "Bar_engraver"; @} \translator@{ \HaraKiriStaffContext + \remove "Multi_measure_rest_engraver"; + \remove "Bar_engraver"; @} \translator @{ \OrchestralScoreContext @@ -1712,6 +1717,8 @@ need the @code{Rest_engraver} from Voice to Thread level. \translator@{ \VoiceContext \remove "Rest_engraver"; + \consists "Multi_measure_rest_engraver"; + \consists "Bar_engraver"; @} @end example @@ -1722,6 +1729,8 @@ the automatic removing of empty staffs. @example \translator@{ \HaraKiriStaffContext + \remove "Multi_measure_rest_engraver"; + \remove "Bar_engraver"; @} @end example @@ -1813,3 +1822,8 @@ bars. That's all folks. From here, you can either try fiddling with input files, or you can read the reference manual. + + +@c @lilypond[nofragment] +@c #(set! point-and-click #f) +@c @end lilypond diff --git a/GNUmakefile.in b/GNUmakefile.in index 9bf8f5caa3..eaff8f986d 100644 --- a/GNUmakefile.in +++ b/GNUmakefile.in @@ -17,10 +17,10 @@ SCRIPTS = configure aclocal.m4 README_FILES = DEDICATION COPYING NEWS CHANGES ROADMAP README_TXT_FILES = AUTHORS.txt README.txt INSTALL.txt FAQ.txt IN_FILES := $(wildcard *.in) -EXTRA_DIST_FILES = lilypond-font-lock.el lilypond-mode.el vimrc VERSION $(README_FILES) $(SCRIPTS) $(IN_FILES) +EXTRA_DIST_FILES = lilypond-font-lock.el lilypond-mode.el vimrc VERSION $(README_FILES) $(SCRIPTS) $(IN_FILES) emacsclient.patch NON_ESSENTIAL_DIST_FILES = $(README_TXT_FILES) INSTALLATION_DIR=$(datadir) -INSTALLATION_FILES=$(builddir)/config.make VERSION +INSTALLATION_FILES=$(configuration) VERSION # bootstrap stepmake: # diff --git a/VERSION b/VERSION index 86d05cc9dd..a7cb301d0d 100644 --- a/VERSION +++ b/VERSION @@ -2,7 +2,7 @@ PACKAGE_NAME=LilyPond MAJOR_VERSION=1 MINOR_VERSION=3 PATCH_LEVEL=139 -MY_PATCH_LEVEL= +MY_PATCH_LEVEL=jcn1 # use the above to send patches: MY_PATCH_LEVEL is always empty for a # released version. diff --git a/emacsclient.patch b/emacsclient.patch new file mode 100644 index 0000000000..e2df3ede6b --- /dev/null +++ b/emacsclient.patch @@ -0,0 +1,148 @@ +diff -ur emacs-20.5/lib-src/ChangeLog emacs-hanwen/lib-src/ChangeLog +--- emacs-20.5/lib-src/ChangeLog Fri Dec 10 17:25:36 1999 ++++ emacs-hanwen/lib-src/ChangeLog Sun Jul 16 23:00:54 2000 +@@ -1,3 +1,7 @@ ++2000-07-16 Han-Wen Nienhuys ++ ++ * emacsclient.c: Added support for +LINE:COLUMN style arguments. ++ + 1999-12-04 Gerd Moellmann + + * Version 20.5 released. +Only in emacs-hanwen/lib-src: ChangeLog~ +diff -ur emacs-20.5/lib-src/emacsclient.c emacs-hanwen/lib-src/emacsclient.c +--- emacs-20.5/lib-src/emacsclient.c Wed Nov 3 14:12:46 1999 ++++ emacs-hanwen/lib-src/emacsclient.c Sun Jul 16 22:10:35 2000 +@@ -27,6 +27,7 @@ + #undef close + #undef signal + ++#include + #include + #include + #ifdef STDC_HEADERS +@@ -323,7 +324,7 @@ + if (*argv[i] == '+') + { + char *p = argv[i] + 1; +- while (*p >= '0' && *p <= '9') p++; ++ while (isdigit (*p) || *p == ':') p++; + if (*p != 0) + fprintf (out, "%s/", quote_file_name (cwd)); + } +@@ -466,7 +467,8 @@ + if (*modified_arg == '+') + { + char *p = modified_arg + 1; +- while (*p >= '0' && *p <= '9') p++; ++ while (isdigit (*p) || *p == ':') ++ p++; + if (*p != 0) + need_cwd = 1; + } +Only in emacs-hanwen/lib-src: emacsclient.c~ +diff -ur emacs-20.5/lib-src/emacsserver.c emacs-hanwen/lib-src/emacsserver.c +--- emacs-20.5/lib-src/emacsserver.c Mon Feb 22 21:44:14 1999 ++++ emacs-hanwen/lib-src/emacsserver.c Sun Jul 16 22:09:52 2000 +@@ -61,6 +61,7 @@ + #include + #include + ++ + #ifdef HAVE_UNISTD_H + #include + #endif +Only in emacs-hanwen/lib-src: emacsserver.c~ +Only in emacs-hanwen/lib-src: suf.el~ +diff -ur emacs-20.5/lisp/ChangeLog emacs-hanwen/lisp/ChangeLog +--- emacs-20.5/lisp/ChangeLog Fri Dec 10 17:25:02 1999 ++++ emacs-hanwen/lisp/ChangeLog Sun Jul 16 23:00:04 2000 +@@ -1,3 +1,8 @@ ++2000-07-16 Han-Wen Nienhuys ++ ++ * server.el (server-process-filter,server-visit-files): add support for "LINE:COLUMN" ++ style emacsclient calls. ++ + 1999-12-04 Gerd Moellmann + + * Version 20.5 released. +Only in emacs-hanwen/lisp: ChangeLog~ +diff -ur emacs-20.5/lisp/server.el emacs-hanwen/lisp/server.el +--- emacs-20.5/lisp/server.el Sat Mar 13 01:20:25 1999 ++++ emacs-hanwen/lisp/server.el Sun Jul 16 23:04:41 2000 +@@ -215,7 +215,8 @@ + default-file-name-coding-system))) + client nowait + (files nil) +- (lineno 1)) ++ (lineno 1) ++ (columnno 0)) + ;; Remove this line from STRING. + (setq string (substring string (match-end 0))) + (if (string-match "^Error: " request) +@@ -232,9 +233,17 @@ + (setq request (substring request (match-end 0))) + (if (string-match "\\`-nowait" arg) + (setq nowait t) +- (if (string-match "\\`\\+[0-9]+\\'" arg) +- ;; ARG is a line number option. +- (setq lineno (read (substring arg 1))) ++ (cond ++ ;; ARG is a line number option. ++ ((string-match "\\`\\+[0-9]+\\'" arg) ++ (setq lineno (read (substring arg 1))) ++ ) ++ ;; ARG is line number / column option. ++ ((string-match "\\`\\+[0-9]+:[0-9]+\\'" arg) ++ (setq lineno (read (substring arg 1 (string-match ":" arg)))) ++ (setq columnno (read (substring arg (+ 1 (string-match ":" arg))))) ++ ) ++ (t + ;; ARG is a file name. + ;; Collapse multiple slashes to single slashes. + (setq arg (command-line-normalize-file-name arg)) +@@ -253,9 +262,11 @@ + (if coding-system + (setq arg (decode-coding-string arg coding-system))) + (setq files +- (cons (list arg lineno) ++ (cons (list arg lineno columnno) + files)) +- (setq lineno 1))))) ++ (setq lineno 1) ++ (setq columnno 0) ++ ))))) + (server-visit-files files client nowait) + ;; CLIENT is now a list (CLIENTNUM BUFFERS...) + (or nowait +@@ -267,9 +278,11 @@ + ;; Save for later any partial line that remains. + (setq server-previous-string string)) + ++ ++ + (defun server-visit-files (files client &optional nowait) + "Finds FILES and returns the list CLIENT with the buffers nconc'd. +-FILES is an alist whose elements are (FILENAME LINENUMBER). ++FILES is an alist whose elements are (FILENAME LINENUMBER COLUMNNUMBER). + NOWAIT non-nil means this client is not waiting for the results, + so don't mark these buffers specially, just visit them normally." + ;; Bind last-nonmenu-event to force use of keyboard, not mouse, for queries. +@@ -297,6 +310,7 @@ + (set-buffer (find-file-noselect filen)) + (run-hooks 'server-visit-hook))) + (goto-line (nth 1 (car files))) ++ (move-to-column (nth 2 (car files))) + (if (not nowait) + (setq server-buffer-clients + (cons (car client) server-buffer-clients))) +@@ -304,6 +318,7 @@ + (setq files (cdr files))) + (set-buffer obuf)) + (nconc client client-record))) ++ + + (defun server-buffer-done (buffer &optional for-killing) + "Mark BUFFER as \"done\" for its client(s). +Only in emacs-hanwen/lisp: server.el.orig +Only in emacs-hanwen/lisp: server.el~ diff --git a/input/bugs/p.ly b/input/bugs/p.ly new file mode 100644 index 0000000000..a63e8ef9a8 --- /dev/null +++ b/input/bugs/p.ly @@ -0,0 +1,31 @@ +% +% mmrests of second voice should not disappear +% +% the problem is more complex: the mmrest-engraver lives at staff level, +% but it seems that we need one per voice. +% +\score { + \notes < + \context Staff = Viole < + \context Voice=one \partcombine Voice + + % ordering significant ?? + \context Thread=two \relative c''{ R1 c2 c2 } + \context Thread=one { R1*2 } + > + > + \paper { +% { + \translator { + \StaffContext + \remove Multi_measure_rest_engraver; + \remove Bar_engraver; + } + \translator { + \VoiceContext + \consists Multi_measure_rest_engraver; + \consists Bar_engraver; + } +% } + } +} \ No newline at end of file diff --git a/input/bugs/triplet.ly b/input/bugs/triplet.ly new file mode 100644 index 0000000000..7e1855d2d3 --- /dev/null +++ b/input/bugs/triplet.ly @@ -0,0 +1,30 @@ + +% +% huh? wat gaat er nu fout in os-score.ly, hier issie okede? +% +global = { + \time 2/4; + \skip 2*4; \bar "|."; +} +Key = \notes \key as \major; + +\score { + < + \global + \context StaffGroup = timpani < + \context Staff = timpani < + \Key + \notes\relative c { + \times 2/3 { f4 f f } + \times 4/5 { as8 as as as as } + R1 + } + > > + > + \paper { + linewidth = -1.; + \translator { + \HaraKiriStaffContext + } + } +} diff --git a/input/regression/rest-ledger.ly b/input/regression/rest-ledger.ly new file mode 100644 index 0000000000..9e5894f0ba --- /dev/null +++ b/input/regression/rest-ledger.ly @@ -0,0 +1,30 @@ +\header { +texidoc = "whole and half rests moving outside the staff should get +ledger lines"; +} + + +\score { +\notes { + \property Voice.Rest \set #'staff-position = #4 + r1 \property Voice.Rest \set #'staff-position = #5 + r1 \property Voice.Rest \set #'staff-position = #6 + + r1 \property Voice.Rest \set #'staff-position = #-6 + r1 \property Voice.Rest \set #'staff-position = #-7 + r1 \property Voice.Rest \set #'staff-position = #-8 + r1 + + \property Voice.Rest \set #'staff-position = #6 + r2 \property Voice.Rest \set #'staff-position = #7 + r2 \property Voice.Rest \set #'staff-position = #8 + + r2 \property Voice.Rest \set #'staff-position = #-4 + r2 \property Voice.Rest \set #'staff-position = #-5 + r2 \property Voice.Rest \set #'staff-position = #-6 + r2 + + + + +}} diff --git a/input/test/broken-thread-line.ly b/input/test/broken-thread-line.ly index 466b8d0991..597e2e6163 100644 --- a/input/test/broken-thread-line.ly +++ b/input/test/broken-thread-line.ly @@ -1,7 +1,7 @@ -% followThread: connect note heads with line when thread switches staff +% followVoice: connect note heads with line when thread switches staff \score{ \context PianoStaff < @@ -18,7 +18,7 @@ linewidth = 70.\mm; \translator { \ScoreContext - followThread = ##t + followVoice = ##t } } } diff --git a/input/test/part-combine-mmrest.ly b/input/test/part-combine-mmrest.ly new file mode 100644 index 0000000000..7e035af3c9 --- /dev/null +++ b/input/test/part-combine-mmrest.ly @@ -0,0 +1,4 @@ +\header { + texidoc = "" + + } \ No newline at end of file diff --git a/input/tutorial/os-flute-2.ly b/input/tutorial/os-flute-2.ly index 30308d1de8..f89b07f2f5 100644 --- a/input/tutorial/os-flute-2.ly +++ b/input/tutorial/os-flute-2.ly @@ -25,3 +25,7 @@ } } + +% switch off settings of -score file, so the rest of the +% tutorial isn't \special +#(set! point-and-click #f) \ No newline at end of file diff --git a/input/tutorial/os-music.ly b/input/tutorial/os-music.ly index 96136d0f3b..4625b12d72 100644 --- a/input/tutorial/os-music.ly +++ b/input/tutorial/os-music.ly @@ -26,6 +26,7 @@ tromboII = \notes\relative c'' { timpani = \notes\relative c, { \times 2/3 { f4 f f } \times 4/5 { as8 as as as as } + R1 } corno = \notes\relative c' { bes4 d f, bes d f, bes d diff --git a/input/tutorial/os-score.ly b/input/tutorial/os-score.ly index b5c69a34fa..8c4fc4f4c6 100644 --- a/input/tutorial/os-score.ly +++ b/input/tutorial/os-score.ly @@ -61,9 +61,13 @@ \translator{ \VoiceContext \remove "Rest_engraver"; + \consists "Multi_measure_rest_engraver"; + \consists "Bar_engraver"; } \translator{ \HaraKiriStaffContext + \remove "Multi_measure_rest_engraver"; + \remove "Bar_engraver"; } \translator { \OrchestralScoreContext @@ -75,3 +79,4 @@ } } + diff --git a/lily/a2-engraver.cc b/lily/a2-engraver.cc index 55d6c45d95..f52b9f0387 100644 --- a/lily/a2-engraver.cc +++ b/lily/a2-engraver.cc @@ -14,7 +14,7 @@ #include "translator-group.hh" #include "side-position-interface.hh" #include "directional-element-interface.hh" - +#include "multi-measure-rest.hh" class A2_engraver : public Engraver { @@ -130,6 +130,12 @@ A2_engraver::acknowledge_grob (Grob_info i) else if (unirhythm) state_ = UNIRHYTHM; + Direction d = CENTER; + if (daddy_trans_l_->id_str_.left_str (3) == "one") + d = UP; + else if (daddy_trans_l_->id_str_.left_str (3) == "two") + d = DOWN; + /* Must only set direction for VoiceCombines, not for StaffCombines: we can't detect that here, so, ugh, yet another property */ if (!to_boolean (get_property ("noDirection")) @@ -160,16 +166,23 @@ A2_engraver::acknowledge_grob (Grob_info i) || (unirhythm == SCM_BOOL_T && split_interval == SCM_BOOL_T && (unison != SCM_BOOL_T || solo_adue != SCM_BOOL_T))) { - if (daddy_trans_l_->id_str_.left_str (3) == "one") - { - i.elem_l_->set_grob_property ("direction", gh_int2scm (1)); - } - else if (daddy_trans_l_->id_str_.left_str (3) == "two") - { - i.elem_l_->set_grob_property ("direction", gh_int2scm (-1)); - } + + /* + Blunt axe method: every grob gets a propertysetting. + */ + i.elem_l_->set_grob_property ("direction", gh_int2scm (d)); } } + + /* + todo: should we have separate state variable for being "rest while + other has solo?" */ + if ( Multi_measure_rest::has_interface (i.elem_l_) && d ) + if (state_ == UNIRHYTHM + && unisilence != SCM_BOOL_T) + { + i.elem_l_->set_grob_property ("staff-position", gh_int2scm (d * 6)); + } } void diff --git a/lily/dynamic-engraver.cc b/lily/dynamic-engraver.cc index 0d0ab6be59..ee563516c0 100644 --- a/lily/dynamic-engraver.cc +++ b/lily/dynamic-engraver.cc @@ -259,7 +259,10 @@ Dynamic_engraver::process_music () daddy_trans_l_->set_property (start_type + "Spanner", SCM_UNDEFINED); s = get_property ((start_type + "Text").ch_C ()); - if (gh_string_p (s)) + /* + FIXME: use markup_p () to check type. + */ + if (gh_string_p (s) || gh_pair_p (s)) { cresc_p_->set_grob_property ("edge-text", gh_cons (s, ly_str02scm (""))); diff --git a/lily/includable-lexer.cc b/lily/includable-lexer.cc index 70ffaaf097..7da0ba4974 100644 --- a/lily/includable-lexer.cc +++ b/lily/includable-lexer.cc @@ -21,7 +21,8 @@ #endif #ifndef YY_START -#define YY_START() ((yy_start - 1) / 2) +#define YY_START\ + ((yy_start - 1) / 2) #define YYSTATE YY_START #endif diff --git a/lily/include/rest.hh b/lily/include/rest.hh index fdd41ce7e7..53fe6585f5 100644 --- a/lily/include/rest.hh +++ b/lily/include/rest.hh @@ -17,6 +17,7 @@ class Rest public: DECLARE_SCHEME_CALLBACK (after_line_breaking, (SCM )); static bool has_interface (Grob*); + static String glyph_name (Grob*, int, String); static SCM brew_internal_molecule (SCM); DECLARE_SCHEME_CALLBACK (extent_callback, (SCM,SCM)); DECLARE_SCHEME_CALLBACK (brew_molecule, (SCM )); diff --git a/lily/multi-measure-rest.cc b/lily/multi-measure-rest.cc index 8b0f8dd5dd..7a83efbd41 100644 --- a/lily/multi-measure-rest.cc +++ b/lily/multi-measure-rest.cc @@ -144,7 +144,17 @@ Multi_measure_rest::brew_molecule (SCM smob) SCM limit = me->get_grob_property ("expand-limit"); - if (measures <= gh_scm2int (limit)) + if (measures == 1) + { + s = musfont->find_by_name (Rest::glyph_name (me, 0, "")); + + /* + ugh. + */ + if (Staff_symbol_referencer::position_f (me) == 0.0) + s.translate_axis (Staff_symbol_referencer::staff_space (me), Y_AXIS); + } + else if (measures <= gh_scm2int (limit)) { /* Build a rest from smaller parts. Distances inbetween are diff --git a/lily/note-head-line-engraver.cc b/lily/note-head-line-engraver.cc index f0483ed031..58f52a1f35 100644 --- a/lily/note-head-line-engraver.cc +++ b/lily/note-head-line-engraver.cc @@ -79,7 +79,7 @@ Note_head_line_engraver::acknowledge_grob (Grob_info info) if (Rhythmic_head::has_interface (info.elem_l_)) { head_ = info.elem_l_; - if (to_boolean (get_property ("followThread"))) + if (to_boolean (get_property ("followVoice"))) { Translator_group * tr = daddy_trans_l_; while (tr && tr->type_str_ != "Staff") @@ -108,7 +108,7 @@ Note_head_line_engraver::create_grobs () Should probably store follow_ in line_, and suicide at some later point */ if (follow_) - line_ = new Spanner (get_property ("FollowThread")); + line_ = new Spanner (get_property ("VoiceFollower")); else line_ = new Spanner (get_property ("Glissando")); diff --git a/lily/property-iterator.cc b/lily/property-iterator.cc index 1967bea297..84c8486d0b 100644 --- a/lily/property-iterator.cc +++ b/lily/property-iterator.cc @@ -73,4 +73,4 @@ Pop_property_iterator::process (Moment m) IMPLEMENT_CTOR_CALLBACK (Pop_property_iterator); IMPLEMENT_CTOR_CALLBACK (Push_property_iterator); IMPLEMENT_CTOR_CALLBACK (Property_iterator); -IMPLEMENT_CTOR_CALLBACK(Property_unset_iterator); +IMPLEMENT_CTOR_CALLBACK (Property_unset_iterator); diff --git a/lily/rest.cc b/lily/rest.cc index 4bbdaa5146..2efbf78e04 100644 --- a/lily/rest.cc +++ b/lily/rest.cc @@ -36,6 +36,37 @@ Rest::after_line_breaking (SCM smob) return SCM_UNSPECIFIED; } +/* + make this function easily usable in C++ + */ + +String +Rest::glyph_name (Grob * me, int balltype, String style) +{ + bool ledger_b =false; + + if (balltype == 0 || balltype == 1) + { + Real rad = Staff_symbol_referencer::staff_radius (me) * 2.0; + Real pos = Staff_symbol_referencer::position_f (me); + + /* + Figure out when the rest is far enough outside the staff. This + could bemore generic, but hey, we understand this even after + dinner. + + */ + ledger_b = ledger_b || (balltype == 0 && (pos >= rad +2 || pos < -rad )); + ledger_b = ledger_b || (balltype == 1 && + (pos <= -rad -2 || pos > rad)); + } + + return ("rests-") + to_str (balltype) + + (ledger_b ? "o" : "") + style; +} + + + MAKE_SCHEME_CALLBACK (Rest,brew_molecule,1); @@ -43,28 +74,20 @@ SCM Rest::brew_internal_molecule (SCM smob) { Grob* me = unsmob_grob (smob); - - bool ledger_b =false; - SCM balltype = me->get_grob_property ("duration-log"); - - if (balltype == gh_int2scm (0) || balltype == gh_int2scm (1)) - { - int sz = Staff_symbol_referencer::line_count (me); - Real dif = abs (Staff_symbol_referencer::position_f (me) - (2* gh_scm2int (balltype) - 1)); - ledger_b = dif > sz; - } + SCM balltype_scm = me->get_grob_property ("duration-log"); + if (!gh_number_p (balltype_scm)) + return Molecule ().smobbed_copy (); + int balltype = gh_scm2int (balltype_scm); String style; SCM style_sym =me->get_grob_property ("style"); - if (gh_scm2int (balltype) >= 2 && gh_symbol_p (style_sym)) + if (balltype >= 2 && gh_symbol_p (style_sym)) { style = ly_scm2string (scm_symbol_to_string (style_sym)); } - String idx = ("rests-") + to_str (gh_scm2int (balltype)) - + (ledger_b ? "o" : "") + style; - + String idx = glyph_name (me, balltype, style); return Font_interface::get_default_font (me)->find_by_name (idx).smobbed_copy (); } diff --git a/lily/scheme-option.cc b/lily/scheme-option.cc index acc0d8f17d..16b2a9d830 100644 --- a/lily/scheme-option.cc +++ b/lily/scheme-option.cc @@ -9,7 +9,18 @@ #include "lily-guile.hh" +/* + TODO: mooie onschuldige test, en koel om allerleide dingen te kunnen zetten, + maar is dit nou wel handig voor gebruikert? + + -X, of -fps is hendiger dan + + -e "(set-lily-option 'midi-debug #t)' + + [niet voor niets tiepo in 139 announs..] +*/ +/* Write midi as formatted ascii stream? */ bool midi_debug_global_b; @@ -62,6 +73,6 @@ init_functions () } -ADD_SCM_INIT_FUNC(init_functions_sopt, init_functions); +ADD_SCM_INIT_FUNC (init_functions_sopt, init_functions); diff --git a/lily/translator-def.cc b/lily/translator-def.cc index 6150a66d11..aa33ce33fa 100644 --- a/lily/translator-def.cc +++ b/lily/translator-def.cc @@ -181,14 +181,11 @@ Translator_def::path_to_acceptable_translator (SCM type_str, Music_output_def* o Link_array best_result; for (int i=0; i < accepted_arr.size (); i++) { - bool found =false; - if (scm_equal_p (accepted_arr[i]->type_name_, type_str) == SCM_BOOL_T) - found = true; - for (SCM s = accepted_arr[i]->type_aliases_; !found && gh_pair_p (s); s = gh_cdr (s)) - found = found || (gh_equal_p (gh_car (s), type_str)); - - if (found) + /* + don't check aliases, because \context Staff should not create RhythmicStaff. + */ + if (gh_equal_p (accepted_arr[i]->type_name_, type_str)) { best_result.push (accepted_arr[i]); return best_result; diff --git a/ly/engraver.ly b/ly/engraver.ly index 2054900b0d..72dced40f5 100644 --- a/ly/engraver.ly +++ b/ly/engraver.ly @@ -363,7 +363,7 @@ ScoreContext = \translator { soloText = #"Solo" soloIIText = #"Solo II" - aDueText = #"\\`a2" + aDueText = #"a2" soloADue = ##t splitInterval = #'(0 . 1) changeMoment = #`(,(make-moment 0 0) . ,(make-moment 1 512)) diff --git a/make/ly-rules.make b/make/ly-rules.make index 92839d41a0..81b623957d 100644 --- a/make/ly-rules.make +++ b/make/ly-rules.make @@ -28,8 +28,8 @@ $(outdir)/%.nexi: %.tely # nfo: info from non-lily texi $(outdir)/%.info: $(outdir)/%.nexi - -$(MAKEINFO) --force --output=$(outdir)/$(*F).info $< + $(MAKEINFO) --output=$(outdir)/$(*F).info $< # nfo: info from non-lily texi #$(outdir)/%.nfo: $(outdir)/%.nexi -# -$(MAKEINFO) --force --output=$(outdir)/$(*F).info $< +# $(MAKEINFO) --output=$(outdir)/$(*F).info $< diff --git a/make/ly-vars.make b/make/ly-vars.make index 024d2ab564..2d18629cfb 100644 --- a/make/ly-vars.make +++ b/make/ly-vars.make @@ -1,4 +1,9 @@ # empty TELY_FILES := $(wildcard *.tely) +ITELY_FILES := $(wildcard *.itely) +ITEXI_FILES := $(wildcard *.itexi) + +TEXINFO_SOURCES += $(TELY_FILES) $(ITELY_FILES) $(ITEXI_FILES) + EXTRA_DIST_FILES += $(TELY_FILES) diff --git a/mf/feta-generic.mf b/mf/feta-generic.mf index 26c91cf95b..2e31f1ada8 100644 --- a/mf/feta-generic.mf +++ b/mf/feta-generic.mf @@ -39,8 +39,8 @@ if test = 0: else: % input feta-bolletjes; % input feta-banier; -% input feta-eindelijk; - input feta-klef; + input feta-eindelijk; +% input feta-klef; % input feta-toevallig; % input feta-schrift; % input feta-haak; diff --git a/mutopia/Coriolan/clarinetto-1.ly b/mutopia/Coriolan/clarinetto-1.ly index 6f7317ecca..33177987ff 100644 --- a/mutopia/Coriolan/clarinetto-1.ly +++ b/mutopia/Coriolan/clarinetto-1.ly @@ -12,7 +12,7 @@ clarinettoI = \notes \relative c { f4-. r r2| e4-. r r2| R1 *4| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes2\p\< ( a| )gis2. \!a4-.\f| @@ -35,7 +35,7 @@ clarinettoI = \notes \relative c { c2. c4\sf| c4 r r2| R1*5| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line a'2.\p\< ( bes4| a g e)c| @@ -49,7 +49,7 @@ clarinettoI = \notes \relative c { d~| d~| d| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes2.\<( c4| bes a fis)d| @@ -132,7 +132,7 @@ clarinettoI = \notes \relative c { )e2. f4\sf(| )e4 r r2| R1*9| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line fis2.\p\<(g4| fis e cis)a| @@ -152,7 +152,7 @@ clarinettoI = \notes \relative c { r2 r4 d(| )cis r r2| r r4 r8 cis| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d4\< r r2| r r4 r8 d| @@ -186,7 +186,7 @@ clarinettoI = \notes \relative c { d4 r8 g f4 r8 c| bes4 r r2| R1*11| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line f'2.\p\<(g4| f e cis)a| @@ -196,7 +196,7 @@ clarinettoI = \notes \relative c { c\f~| c\p| d\f~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d\p\<~| d~| @@ -227,7 +227,7 @@ clarinettoI = \notes \relative c { R1| d4-. d-. r2| d4-. d-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line d4\> r e r| R1| diff --git a/mutopia/Coriolan/clarinetto-2.ly b/mutopia/Coriolan/clarinetto-2.ly index 204ef819aa..e71c8f4015 100644 --- a/mutopia/Coriolan/clarinetto-2.ly +++ b/mutopia/Coriolan/clarinetto-2.ly @@ -38,7 +38,7 @@ clarinettoII = \notes \relative c { d~| d| %a deux| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes'2.\<(c4| bes a fis)d| @@ -110,7 +110,7 @@ clarinettoII = \notes \relative c { )e2. f4\sf(| )e4 r r2| R1*9| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line fis2.\p\<( g4| fis e cis)a| @@ -158,7 +158,7 @@ clarinettoII = \notes \relative c { c1\f~| c\p| a1\f| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d,\p\<~| d~| @@ -191,7 +191,7 @@ clarinettoII = \notes \relative c { R1| a4-. c-. r2| bes4-. c-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line bes4\> r a r| R1| diff --git a/mutopia/Coriolan/contrabasso.ly b/mutopia/Coriolan/contrabasso.ly index e8669deb56..27f12728c8 100644 --- a/mutopia/Coriolan/contrabasso.ly +++ b/mutopia/Coriolan/contrabasso.ly @@ -21,7 +21,7 @@ contrabasso = \notes \relative c { c4 r4 r2| c4 r4 r2| R1| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c'4.\< c8 bes4. bes8| @@ -37,7 +37,7 @@ contrabasso = \notes \relative c { % copied 14 from cello - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes'4.\< bes8 as4. as8| g4 \!g4-.\f r2| @@ -73,7 +73,7 @@ contrabasso = \notes \relative c { )as,4 r r r8 as(| )g4 r r r8 g(| )d'4 r r r8 d(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )es4\< r r r8 es(| )as,4 r r r8 as(| @@ -89,14 +89,14 @@ contrabasso = \notes \relative c { )bes4 r r r8 bes(| )as4 r r r8 as(| )e4 r r r8 e(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )f4\< r r r8 f(| )bes4 r r r8 bes(| %70 \!)as2\ff g| fis d'| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g,4\p\< r r r8 g(| )c4 r r r8 c(| @@ -110,7 +110,7 @@ contrabasso = \notes \relative c { d4\pp r d r| d r d r| %80 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d r d\< r| d r d r| @@ -208,7 +208,7 @@ contrabasso = \notes \relative c { %180 )e4 r r r8 e(| )b'4 r r r8 b(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )c4\< r r r8 c(| )f,4 r r r8 f(| @@ -224,7 +224,7 @@ contrabasso = \notes \relative c { )g,4 r r r8 g(| )f4 r r r8 f(| )cis'4 r r r8 cis(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )d4\< r r r8 d(| @@ -247,7 +247,7 @@ contrabasso = \notes \relative c { %205 g r g r| g r g r| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g r g\< r| g r g r| @@ -307,7 +307,7 @@ contrabasso = \notes \relative c { %250 )es4 r r r8 es(| )b4 r r r8 b(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )c4\< r r r8 c(| )f4 r r r8 f,(| @@ -321,7 +321,7 @@ contrabasso = \notes \relative c { bes\f| %260 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as4.\p\< as'8 g4. g8| f4. f8 es4. es8| @@ -365,7 +365,7 @@ contrabasso = \notes \relative c { f,4-. g-. r2| %290 - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line as4\> r b r| R1| diff --git a/mutopia/Coriolan/coriolan-paper.ly b/mutopia/Coriolan/coriolan-paper.ly index abdc99a0b1..4f39211ffa 100644 --- a/mutopia/Coriolan/coriolan-paper.ly +++ b/mutopia/Coriolan/coriolan-paper.ly @@ -18,7 +18,7 @@ % Set value for engraver at thread level, % to override the default that is set in ScoreContext % for added engraver at Voice level - devNullThread = #'() + %%% devNullThread = #'() } \translator { \VoiceContext @@ -32,22 +32,22 @@ % The staff combine part switches it on. %% devNullThread = #'never - \consists "Thread_devnull_engraver"; + %%%\consists "Thread_devnull_engraver"; % While adds brings back rests of second voice, % it prints some on the bar lines and it is messy % because collisions don't work. Also, it increases % memory usage from 91M RSS, to 116M. - %\consists "Multi_measure_rest_engraver"; - %\consists "Bar_engraver"; + \consists "Multi_measure_rest_engraver"; + \consists "Bar_engraver"; } \translator { \HaraKiriStaffContext \consists "Mark_engraver"; MultiMeasureRest \override #'minimum-width = #6 - %\remove "Multi_measure_rest_engraver"; - %\remove "Bar_engraver"; + \remove "Multi_measure_rest_engraver"; + \remove "Bar_engraver"; } \translator { \OrchestralScoreContext @@ -57,7 +57,7 @@ soloIIText = #"II." % By default, turn off the Thread_devnull_engraver % at Voice level - devNullThread = #'never + %%%devNullThread = #'never TimeSignature \override #'style = #'C BarNumber \override #'padding = #3 diff --git a/mutopia/Coriolan/coriolan-part-paper.ly b/mutopia/Coriolan/coriolan-part-paper.ly index 75dbc1a545..ab00c576ec 100644 --- a/mutopia/Coriolan/coriolan-part-paper.ly +++ b/mutopia/Coriolan/coriolan-part-paper.ly @@ -17,7 +17,7 @@ % Set value for engraver at thread level, % to override the default that is set in ScoreContext % for added engraver at Voice level - devNullThread = #'() + %%%devNullThread = #'() } \translator { \VoiceContext @@ -31,10 +31,10 @@ % The staff combine part switches it on. %% devNullThread = #'never - \consists "Thread_devnull_engraver"; + %%%\consists "Thread_devnull_engraver"; - %\consists "Multi_measure_rest_engraver"; - %\consists "Bar_engraver"; + \consists "Multi_measure_rest_engraver"; + \consists "Bar_engraver"; } % We need the HaraKiri staff for Staff Combining, % but we better remove the Instrument_name_engraver. @@ -44,8 +44,8 @@ \consists "Mark_engraver"; \remove "Instrument_name_engraver"; - %\remove "Multi_measure_rest_engraver"; - %\remove "Bar_engraver"; + \remove "Multi_measure_rest_engraver"; + \remove "Bar_engraver"; } \translator { \OrchestralScoreContext @@ -55,7 +55,7 @@ soloIIText = #"II." % By default, turn off the Thread_devnull_engraver % at Voice level - devNullThread = #'never + %%%devNullThread = #'never TimeSignature \override #'style = #'C BarNumber \override #'padding = #3 diff --git a/mutopia/Coriolan/corno-1.ly b/mutopia/Coriolan/corno-1.ly index 814517d871..ce6ddeb8fe 100644 --- a/mutopia/Coriolan/corno-1.ly +++ b/mutopia/Coriolan/corno-1.ly @@ -17,7 +17,7 @@ cornoI = \notes \relative c { r4 g-.\f r2| R1*2| % `a 2 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r8 f\p\< f2 e4| r8 f f2 e4| @@ -122,7 +122,7 @@ cornoI = \notes \relative c { R1*17| r4 r8 e,8 e4. e8| r4 r8 e8 e4. e8| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 e8\< e4. e8| r4 r8 e8 e4. e8| @@ -166,7 +166,7 @@ cornoI = \notes \relative c { e~| e~| e~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e\<~| e~| diff --git a/mutopia/Coriolan/corno-2.ly b/mutopia/Coriolan/corno-2.ly index 53e5f5f58b..e5153a951c 100644 --- a/mutopia/Coriolan/corno-2.ly +++ b/mutopia/Coriolan/corno-2.ly @@ -18,7 +18,7 @@ cornoII = \notes \relative c { R1*2| % `a 2 % urg, yes this is a-deux, but lily doesn't know about I. / a2 yet. - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r8 f'\p\< f2 e4| r8 f f2 e4| @@ -121,7 +121,7 @@ cornoII = \notes \relative c { e~| e~| e~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e\<~| e~| @@ -134,7 +134,7 @@ cornoII = \notes \relative c { %a deux| r4 r8 e,\p e4. e8| r4 r8 e e4. e8| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 e\< e4. e8| r4 r8 e e4. e8| @@ -181,7 +181,7 @@ cornoII = \notes \relative c { e~| e~| e~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e\<~| e~| diff --git a/mutopia/Coriolan/fagotto-1.ly b/mutopia/Coriolan/fagotto-1.ly index 578da4ab71..f67592c2a5 100644 --- a/mutopia/Coriolan/fagotto-1.ly +++ b/mutopia/Coriolan/fagotto-1.ly @@ -14,13 +14,13 @@ fagottoI = \notes \relative c { R1*5| r2 r4 g4-.\f| R1*5| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line ges'2\p\< f2 ~| f4 \!e-.\f r2| R1| f2\p()es| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d1\<| d| @@ -48,7 +48,7 @@ fagottoI = \notes \relative c { %\property Staff.clefGlyph = #"clefs-C" %\property Staff.clefPosition = #2 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g'2.(as4 \p\<| g f d)bes @@ -64,7 +64,7 @@ fagottoI = \notes \relative c { c~| c~| c~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\<~| c| @@ -78,7 +78,7 @@ fagottoI = \notes \relative c { bes(a bes)g| fis r8 a\pp a4. a8| r4 r8 a a4. a8| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 bes\< bes4. bes8| r4 r8 bes bes4. bes8| @@ -127,7 +127,7 @@ fagottoI = \notes \relative c { e4 r r2| R1*3| r4 r8 f' es4 r8 bes| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c4\< r4 r2| R1*2| @@ -147,7 +147,7 @@ fagottoI = \notes \relative c { [g,: bes: c: des:][f,: bes: c: des:]| [e,: g: bes: des:][c: e: g: c:]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c1\p\< ~| c1~| @@ -189,7 +189,7 @@ fagottoI = \notes \relative c { g~| g~| g| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e''2.(\ r d r| R1| @@ -325,7 +325,7 @@ fagottoI = \notes \relative c { g4 r r2| R1| c4\pp r r2| - \property Voice.decrescendoText = #"sempre pi\\`u piano" + \property Voice.decrescendoText = #'(lines " " "sempre pi\\`u piano" " ") % urg, "" is assumed to be hairpin... %\property Voice.decrescendoSpanner = #"" \property Voice.decrescendoSpanner = #'dashed-line diff --git a/mutopia/Coriolan/fagotto-2.ly b/mutopia/Coriolan/fagotto-2.ly index 40475c2c11..a5f3fc17b5 100644 --- a/mutopia/Coriolan/fagotto-2.ly +++ b/mutopia/Coriolan/fagotto-2.ly @@ -40,7 +40,7 @@ fagottoII = \notes \relative c { %\property Staff.clefPosition = #2 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g''2.(as4 \p\<| g f d)bes| @@ -55,13 +55,13 @@ fagottoII = \notes \relative c { c~| c~| c~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\<~| c| \!c2\ff g'| fis d| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g,4 \p\< r r r8 g(| )c4 r r r8 c(| @@ -70,7 +70,7 @@ fagottoII = \notes \relative c { R1*2| r4 r8 fis\pp fis4. fis8| r4 r8 fis fis4. fis8| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 g\< g4. g8| r4 r8 g g4. g8| @@ -130,7 +130,7 @@ fagottoII = \notes \relative c { e| f| g| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as\<| g| @@ -191,7 +191,7 @@ fagottoII = \notes \relative c { g~| g~| g~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g\<~| g~| @@ -205,7 +205,7 @@ fagottoII = \notes \relative c { a~| a~| a~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line a\<~| a| @@ -219,7 +219,7 @@ fagottoII = \notes \relative c { R1*3| r4 r8 b'' b4. b8| r4 r8 b b4. b8| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 c\< c4. c8| r4 r8 c c4. c8| @@ -277,7 +277,7 @@ fagottoII = \notes \relative c { g\p| bes\f| %a deux| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as4.\p\< as8 g4. g8| f4. f8 es4. es8| @@ -315,7 +315,7 @@ fagottoII = \notes \relative c { R1| es,4-. e-. r2| f4-. g-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line as4\> r b r| R1| diff --git a/mutopia/Coriolan/flauto-1.ly b/mutopia/Coriolan/flauto-1.ly index d990aa3944..2f2fab90bf 100644 --- a/mutopia/Coriolan/flauto-1.ly +++ b/mutopia/Coriolan/flauto-1.ly @@ -12,18 +12,18 @@ flautoI = \notes \relative c { g4-. r r2| b,4-. r r2| R1 *4| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r2 g'\p\< (| )fis2. \!g4-.\f| R1*5| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r2 f\p\< ~| f4 \!e-.\f r2| R1| f2\p()es| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d1\<| d1| @@ -47,7 +47,7 @@ flautoI = \notes \relative c { f2. ges4\sf| f4 r r2| R1*9| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g2.\p\<(f4| as g d)bes @@ -57,13 +57,13 @@ flautoI = \notes \relative c { c~| c~| c~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\<~| c~| \!c2\ff es| d1~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d\p\<~| d~| @@ -74,7 +74,7 @@ flautoI = \notes \relative c { \!fis\pp r r2| r2 r4 r8 a| bes4 r r2| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r r4 r8 bes\<| c4 r r r8 c| @@ -121,7 +121,7 @@ flautoI = \notes \relative c { r4 r8 f' es4 r8 bes| c4 r r2| R1*2| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 ges'\< f4 r8 c| \!des4 r r2| @@ -156,14 +156,14 @@ flautoI = \notes \relative c { )d2. es4\sf(| )d r r2| R1*9| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e2.\p\<(f4| e d b )g| \!g2\ff bes| a1~a4\p r r2| R1*3| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line a1\<~| a| @@ -207,7 +207,7 @@ flautoI = \notes \relative c { c r8 f8 es4 r8 bes| as4-. des4-. r2| R1*11| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line es2.\p\<(f4| es d b)g| @@ -247,7 +247,7 @@ flautoI = \notes \relative c { R1| c4-. c4-. r2| c4-. c4-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line c4\> r d r| R1| diff --git a/mutopia/Coriolan/flauto-2.ly b/mutopia/Coriolan/flauto-2.ly index 5f5ec2801e..403d48e955 100644 --- a/mutopia/Coriolan/flauto-2.ly +++ b/mutopia/Coriolan/flauto-2.ly @@ -123,7 +123,7 @@ flautoII = \notes \relative c { bes\f~| bes\p| c1\f~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\p\<~| c~| @@ -158,7 +158,7 @@ flautoII = \notes \relative c { R1| c4-. g'-. r2| as4-. e-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line f4\> r f r| R1| diff --git a/mutopia/Coriolan/oboe-1.ly b/mutopia/Coriolan/oboe-1.ly index 09f4623371..347b86a58e 100644 --- a/mutopia/Coriolan/oboe-1.ly +++ b/mutopia/Coriolan/oboe-1.ly @@ -12,18 +12,18 @@ oboeI = \notes \relative c'' { g4-. r r2| g4-. r r2| R1 *4| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as2\p\< ( g| )fis2. \!g4-.\f| R1*5| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line ges2\p\< f ~| f4 \!e\f r2| R1| f2\p()es| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d1\<| d| @@ -47,7 +47,7 @@ oboeI = \notes \relative c'' { f2. ges4| f4 r r2| R1*9| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g2.\p\<( as4| g f d)bes| @@ -55,13 +55,13 @@ oboeI = \notes \relative c'' { c bes| as4\p r r2| R1*3| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as2.\p\<( bes4| as g e)c| \!c'2\ff es,| d1~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line d\p\< ~| d~| @@ -72,7 +72,7 @@ oboeI = \notes \relative c'' { fis\pp r r2| r r4 r8 fis'| g4 r r2| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r r4 r8 g\<| a4 r r r8 a| @@ -119,7 +119,7 @@ oboeI = \notes \relative c'' { des4 r r r8 c| bes4 r8 es f4 r8 f| g4 r8 g e4 r 8 e| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c'1\p\< ~| c~| @@ -150,7 +150,7 @@ oboeI = \notes \relative c'' { )g2. fis4\sf(| )g4 r r2| R1*5| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e2.\p\< (f4| e d b)g| @@ -163,7 +163,7 @@ oboeI = \notes \relative c'' { a~| a~| a| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line f2.\<( g4| f e cis)a| @@ -179,7 +179,7 @@ oboeI = \notes \relative c'' { es(d es)c| b r r2| r r4 r8 d| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line es4\< r r2| r r4 r8 es| @@ -216,7 +216,7 @@ oboeI = \notes \relative c'' { es d b)g| g'2.(as4| g2)f| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line es2.\<( f4| es d b)g| @@ -226,7 +226,7 @@ oboeI = \notes \relative c'' { f\f| g\p| g\f| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\p\<~| c~| @@ -258,7 +258,7 @@ oboeI = \notes \relative c'' { R1| c4-. g-. r2| as4-. e-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line f4\> r f r| R1| diff --git a/mutopia/Coriolan/oboe-2.ly b/mutopia/Coriolan/oboe-2.ly index ee98acea4a..c3d92600a8 100644 --- a/mutopia/Coriolan/oboe-2.ly +++ b/mutopia/Coriolan/oboe-2.ly @@ -71,7 +71,7 @@ oboeII = \notes \relative c{ des4 r r r8 c| bes4 r8 bes bes4 r8 bes| bes4 r8 bes bes4 r8 bes| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c1\p\< ~| c~| @@ -136,7 +136,7 @@ oboeII = \notes \relative c{ d\f| es\p| e\f| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\p\< ~| c~| @@ -169,7 +169,7 @@ oboeII = \notes \relative c{ R1| c4-. c-. r2| c4-. c-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line c4\> r d r| R1| diff --git a/mutopia/Coriolan/timpani.ly b/mutopia/Coriolan/timpani.ly index e49ee5d5f9..7c30e18680 100644 --- a/mutopia/Coriolan/timpani.ly +++ b/mutopia/Coriolan/timpani.ly @@ -16,7 +16,7 @@ timpani = \notes \relative c { R1*6| r4 c-.\f r2| R1*2| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r2 c4-.\p\< r| r2 c4-. r| @@ -124,7 +124,7 @@ timpani = \notes \relative c { R1| c4-. c-. r2| c4-. c-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line c4\> r g r| R1| diff --git a/mutopia/Coriolan/trombo-1.ly b/mutopia/Coriolan/trombo-1.ly index 1d8b306125..781155c4fe 100644 --- a/mutopia/Coriolan/trombo-1.ly +++ b/mutopia/Coriolan/trombo-1.ly @@ -16,7 +16,7 @@ tromboI = \notes \relative c { R1*6| r4 c-.\f r2| R1*2| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r2 c4\p\< r| r2 c4 r| @@ -108,7 +108,7 @@ tromboI = \notes \relative c { c4 r r2| R1*18| e1\f(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )c\p\< ~| c~| @@ -141,7 +141,7 @@ tromboI = \notes \relative c { R1| c4-. c-. r2| c4-. c-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line c4\> r g r| R1| diff --git a/mutopia/Coriolan/trombo-2.ly b/mutopia/Coriolan/trombo-2.ly index 1ecdc4bee0..1c84a9b838 100644 --- a/mutopia/Coriolan/trombo-2.ly +++ b/mutopia/Coriolan/trombo-2.ly @@ -16,7 +16,7 @@ tromboII = \notes \relative c { R1*6| r4 c-.\f r2| R1*2| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r2 c4\p\< r| r2 c4 r| @@ -108,7 +108,7 @@ tromboII = \notes \relative c { c4 r r2| R1*18| c1\f~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c\p\< ~| c~| @@ -141,7 +141,7 @@ tromboII = \notes \relative c { R1| c,4-. c-. r2| c4-. c-. r2| - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line c4\> r g r| R1| diff --git a/mutopia/Coriolan/viola-1.ly b/mutopia/Coriolan/viola-1.ly index 641196037c..2229887ad6 100644 --- a/mutopia/Coriolan/viola-1.ly +++ b/mutopia/Coriolan/viola-1.ly @@ -24,7 +24,7 @@ violaI = \notes \relative c { [c,8-. es-.] [es()d] [d-. g-.] g4-"ten."| [c,8-. es-.] [es()d] [d-. as'-.] [as()g]| [g8-. c-.] [c()b] [b-. f'-.] [f()es]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line es4.\< es8 d4. d8| %20 @@ -35,14 +35,14 @@ violaI = \notes \relative c { r4 [des8\p()c][c-. ges'-.][ges()f]| %25 [f-. bes-.][bes()a][a-. es'-.][es()des]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line des4.\< des8 c4. c8| bes4 \!bes4-.\f r2| R1 % same rhythm as violins... r8 c-.\p c4. c8-. c4~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [c8\< c-.]c2.~| %30 @@ -76,7 +76,7 @@ violaI = \notes \relative c { )g4 r r r8 g(| %55 )d4 r r r8 d(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )es4 r\< r r8 es(| )as4 r r r8 as(| @@ -92,14 +92,14 @@ violaI = \notes \relative c { )bes4 r r r8 bes(| )as4 r r r8 as(| )e4 r r r8 e(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )f4\< r r r8 f(| )bes4 r r r8 bes| %70 \!c2:\ff bes:| a: fis:| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g4\p\< r r r8 g(| )c,4 r r r8 c| @@ -111,7 +111,7 @@ violaI = \notes \relative c { [d,-.\pp d'-.] es4. es8-. d4 ~| [d8 d-.] es4. es8-. d4 ~| %80 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [d8\< d-.] es4. es8-. d4 ~| [d8 d-.] es4. es8-. d4 ~| @@ -179,7 +179,7 @@ violaI = \notes \relative c { [e g b c][des c g e]| [f as c des][c des as f]| [g bes d es][d es bes g]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as\< c d es][f es c as]| %131 @@ -203,7 +203,7 @@ violaI = \notes \relative c { [g,: bes: c: des:][f,: bes: c: des:]| [e,: g: bes: des:][c,: e: g: c:]| %shared with cello from here on - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [f,8\p\< as c des][es, g b c]| [des, f a bes][c, es g as]| @@ -260,7 +260,7 @@ violaI = \notes \relative c { %180 )e4 r r r8 e8(| )b'4 r r r8 b8(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )c4 r\< r r8 c,8(| % copied @@ -276,7 +276,7 @@ violaI = \notes \relative c { d,4\p r r r8 d8(| )g4 r r r8 g8(| )f4 r r r8 f8(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )cis4\< r r r8 cis8(| )d4 r r r8 d8(| @@ -298,7 +298,7 @@ violaI = \notes \relative c { r[c\p(as)c]r[c(a)c]| [b-. g'-.] as4. as8-. g4 ~| [g8 g-.] as4. as8-. g4 ~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [g8 g-.\<] as4. as8-. g4 ~| [g8 g-.] as4. as8-. g4 ~| @@ -342,7 +342,7 @@ violaI = \notes \relative c { %240 f,4 r r2| R1*11| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c'4\p\< r r r8 c8(| )f4 r r r8 f,8(| @@ -356,7 +356,7 @@ violaI = \notes \relative c { e'2:16\f e:| %260 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as,8\p\< f']f4. es8 es4 ~| [es8 as]as4. g8 g4 ~| @@ -392,7 +392,7 @@ violaI = \notes \relative c { es4-. e-. r2| f4-. g-. r2| %290 - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line as4\> r g r| R1| diff --git a/mutopia/Coriolan/viola-2.ly b/mutopia/Coriolan/viola-2.ly index 23508b874f..381dee9b92 100644 --- a/mutopia/Coriolan/viola-2.ly +++ b/mutopia/Coriolan/viola-2.ly @@ -24,7 +24,7 @@ violaII = \notes \relative c { [c,8-. es-.] [es()d] [d-. g-.] g4-"ten."| [c,8-. es-.] [es()d] [d-. as'-.] [as()g]| [g8-. c-.] [c()b] [b-. f'-.] [f()es]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line es4.\< es8 d4. d8| %20 @@ -35,14 +35,14 @@ violaII = \notes \relative c { r4 [des8\p()c][c-. ges'-.][ges()f]| %25 [f-. bes-.][bes()a][a-. es'-.][es()des]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line des4.\< des8 c4. c8| bes4 \!bes4-.\f r2| R1 % same rhythm as violins... r8 c,-.\p c4. c8-. c4~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [c8\< c-.]c2.~| %30 @@ -76,7 +76,7 @@ violaII = \notes \relative c { )g4 r r r8 g(| %55 )d4 r r r8 d(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )es4 r\< r r8 es(| )as4 r r r8 as(| @@ -92,14 +92,14 @@ violaII = \notes \relative c { )bes4 r r r8 bes(| )as4 r r r8 as(| )e4 r r r8 e(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )f4\< r r r8 f(| )bes4 r r r8 bes| %70 \!as2:\ff g:| fis: d:| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g4\p\< r r r8 g(| )c,4 r r r8 c| @@ -111,7 +111,7 @@ violaII = \notes \relative c { [d-.\pp d'-.] es4. es8-. d4 ~| [d8 d-.] es4. es8-. d4 ~| %80 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [d8\< d-.] es4. es8-. d4 ~| [d8 d-.] es4. es8-. d4 ~| @@ -176,7 +176,7 @@ violaII = \notes \relative c { [e g b c][des c g e]| [f as c des][c des as f]| [g bes d es][d es bes g]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as\< c d es][f es c as]| %131 @@ -200,7 +200,7 @@ violaII = \notes \relative c { [g,: bes: c: des:][f,: bes: c: des:]| [e,: g: bes: des:][c,: e: g: c:]| %shared with cello from here on - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [f,8\p\< as c des][es, g b c]| [des, f a bes][c, es g as]| @@ -257,7 +257,7 @@ violaII = \notes \relative c { %180 )e4 r r r8 e8(| )b'4 r r r8 b8(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )c4 r\< r r8 c,8(| % copied @@ -273,7 +273,7 @@ violaII = \notes \relative c { d,4\p r r r8 d8(| )g4 r r r8 g8(| )f4 r r r8 f8(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )cis4\< r r r8 cis8(| )d4 r r r8 d8(| @@ -294,7 +294,7 @@ violaII = \notes \relative c { r[as\p(d,)as']r[a(es)a]| [g-. g'-.] as4. as8-. g4 ~| [g8 g-.] as4. as8-. g4 ~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [g8 g-.\<] as4. as8-. g4 ~| [g8 g-.] as4. as8-. g4 ~| @@ -334,7 +334,7 @@ violaII = \notes \relative c { %240 f,4 r r2| R1*11| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c'4\p\< r r r8 c8(| )f4 r r r8 f,8(| @@ -348,7 +348,7 @@ violaII = \notes \relative c { bes2:16\f bes:| %260 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as8\p\< f']f4. es8 es4 ~| [es8 as]as4. g8 g4 ~| @@ -384,7 +384,7 @@ violaII = \notes \relative c { es4-. e-. r2| f4-. g-. r2| %290 - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line as4\> r g r| R1| diff --git a/mutopia/Coriolan/violino-1.ly b/mutopia/Coriolan/violino-1.ly index 10b5a45043..fa5c80df60 100644 --- a/mutopia/Coriolan/violino-1.ly +++ b/mutopia/Coriolan/violino-1.ly @@ -20,7 +20,7 @@ violinoI = \notes \relative c { [c,8-. es-.] [es()d] [d-. g-.] g4-"ten."| [c,8-. es-.] [es()d] [d-. as'-.] [as()g]| [g8-. c-.] [c()b] [b-. f'-.] [f()es]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [es8-.\< as-.] as4. g8-. g4 ~| %20 @@ -31,14 +31,14 @@ violinoI = \notes \relative c { [bes,8\p-. des-.][des()c][c-. ges'-.][ges()f]| %25 [f-. bes-.][bes()a][a-. es'-.][es()des]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [des-.\< ges-.] ges4. f8-. f4~| [f8 e-.]\!e4-.\f r2| R1| %29 r8 f-.\p f4. es8-. es4~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [es8\< d-.]d2.~| [d8 d-.]d2.~| @@ -74,7 +74,7 @@ violinoI = \notes \relative c { %55 bes2 )as| - \property Voice.crescendoText = #"cresc." % poco a poco + \property Voice.crescendoText = #'(lines " " "cresc." " ") % poco a poco \property Voice.crescendoSpanner = #'dashed-line g4 ~| ~| @@ -92,7 +92,7 @@ violinoI = \notes \relative c { c'2.( des4| c2 ) bes| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as16\< c c c][c c c c] c2:16| c: c:| @@ -100,7 +100,7 @@ violinoI = \notes \relative c { %70 \!c:\ff es:| d: c:| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes2.\p\<( c4| bes a fis ) d| @@ -187,7 +187,7 @@ violinoI = \notes \relative c { bes4 r r2| %130 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 f'8\< es4 r8 c| bes4 r8 f' es4 r8 bes| @@ -205,7 +205,7 @@ violinoI = \notes \relative c { des4 r8 ges f4 r8 c| bes4 r8 e f4 r8 bes,| bes4 r8 g' e4 r8 bes'| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as4\p r8 des\< c4 r8 g| @@ -258,7 +258,7 @@ violinoI = \notes \relative c { %180 g'2.( a4| g2 )f| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e4 g2\< g4 ~| @@ -275,7 +275,7 @@ violinoI = \notes \relative c { f e cis ) a| a'2.( bes4| a2 ) g| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [f16\< a a a][a a a a]a2:16| @@ -295,7 +295,7 @@ violinoI = \notes \relative c { r[c(as)c]r[c(a)c]| [b-. d-.]d4. d8-. d4 ~| [d8-. d-.]d4. d8-. d4 ~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [d8-. es-.]es4.\< es8-. es4 ~| [es8-. es-.]es4. es8-. es4 ~| @@ -346,7 +346,7 @@ violinoI = \notes \relative c { %250 g4 g2 g4 ~| g4 g2 g4 ~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [g16\< g g g][g g g g]g2:16| g: g:| @@ -357,7 +357,7 @@ violinoI = \notes \relative c { bes:\p bes:| c:\f c:| %260 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r8 c\< c4. c8 c4 ~| [c8 c] c4. c8 c4 ~| @@ -394,7 +394,7 @@ violinoI = \notes \relative c { as4-. e-. r2| %290 - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line f4\> r d r| R1| @@ -405,7 +405,7 @@ violinoI = \notes \relative c { %295 R1| - \property Voice.decrescendoText = #"sempre pi\\`u piano" + \property Voice.decrescendoText = #'(lines " " "sempre pi\\`u piano" " ") % urg, "" is assumed to be hairpin... %\property Voice.decrescendoSpanner = #"" \property Voice.decrescendoSpanner = #'dashed-line diff --git a/mutopia/Coriolan/violino-2.ly b/mutopia/Coriolan/violino-2.ly index fc9e15a4eb..ed2efcfbd5 100644 --- a/mutopia/Coriolan/violino-2.ly +++ b/mutopia/Coriolan/violino-2.ly @@ -19,7 +19,7 @@ violinoII = \notes \relative c { r r2| R1 *3| r2 [b8-.\p f'-.] [f()es]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [es8-. as-.] as4.\< g8-. g4 ~| %20 @@ -28,7 +28,7 @@ violinoII = \notes \relative c { r2 %25 [a,8-.\p es'-.][es()des]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [des-.\< ges-.]ges4. f8-. f4~| [f8 e-.]\!e4-.\f r2| @@ -36,7 +36,7 @@ violinoII = \notes \relative c { %29 %copied... \transpose c \violino-1(29, 39) r8 f-.\p f4. es8-. es4~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [es8\< d-.]d2.~| [d8 d-.]d2.~| @@ -65,7 +65,7 @@ violinoII = \notes \relative c { %50 bes4 r r2| R1*5| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g'2.\p\<( as4| g f d ) bes| @@ -85,7 +85,7 @@ violinoII = \notes \relative c { c'2.( des4| c2 ) bes| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as16\< c c c][c c c c] c2:16| c: c:| @@ -93,7 +93,7 @@ violinoII = \notes \relative c { %70 \!c:\ff es:| d: c:| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes2.\p\<( c4| bes a fis ) d| @@ -188,7 +188,7 @@ violinoII = \notes \relative c { des4 r8 ges f4 r8 c| bes4 r8 e f4 r8 bes,| bes4 r8 g' e4 r8 bes'| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as4\p r8 des\< c4 r8 g| @@ -247,7 +247,7 @@ violinoII = \notes \relative c { %180 g'2.( a4| g2 )f| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line e4 g2\< g4 ~| g g2 g4 ~| @@ -265,7 +265,7 @@ violinoII = \notes \relative c { f e cis ) a| a'2.( bes4| a2 ) g| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [f16\< a a a][a a a a]a2:16| @@ -288,7 +288,7 @@ violinoII = \notes \relative c { r[as(d,)as']r[a(es)a]| [g-. b-.]b4. b8-. b4 ~| [b8-. b-.]b4. b8-. b4 ~| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [b8-. c-.]c4.\< c8-. c4 ~| [c8-. c-.]c4. c8-. c4 ~| @@ -352,7 +352,7 @@ violinoII = \notes \relative c { %250 [g8( es' c es][g es c )g~]| [g8( f' d f][g f d )g,~]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [g8(\< es' c es][g es c )g~]| [g8( d' b d][g d b )g~]| @@ -367,7 +367,7 @@ violinoII = \notes \relative c { %copied viola-1(260, 273) %260 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [f8\p\< f']f4. es8 es4 ~| [es8 as]as4. g8 g4 ~| @@ -407,7 +407,7 @@ violinoII = \notes \relative c { as4-. r2| %290 - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line > r g' r| R1| diff --git a/mutopia/Coriolan/violoncello.ly b/mutopia/Coriolan/violoncello.ly index 30db8710a2..584e00bbd5 100644 --- a/mutopia/Coriolan/violoncello.ly +++ b/mutopia/Coriolan/violoncello.ly @@ -20,7 +20,7 @@ violoncello = \notes \relative c { c4 r4 r2| c4 r4 r2| R1| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line c'4.\< c8 bes4. bes8| @@ -34,7 +34,7 @@ violoncello = \notes \relative c { %25 [f-. bes-.][bes()a][a-. es'-.][es()des]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line bes4.\< bes8 as4. as8| g4 \!g4-.\f r2| @@ -76,7 +76,7 @@ violoncello = \notes \relative c { %55 [bes(as'f as][bes as f)bes,~]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [bes\<(g'es g][bes g es)bes~]| [bes(f'd f][bes f d)bes~]| @@ -98,7 +98,7 @@ violoncello = \notes \relative c { %70 as2\ff g| fis d| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [g8\p\<(bes' g bes][d bes g)d~]| [d8(a' fis a][d a fis)d]| @@ -112,7 +112,7 @@ violoncello = \notes \relative c { r4 r8 d d4. d8| %80 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line r4 r8 d d4.\< d8| r4 r8 d d4. d8| @@ -189,7 +189,7 @@ violoncello = \notes \relative c { [e g b c][des c g e]| [f as c des][c des as f]| [g bes d es][d es bes g]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [as\< c d es][f es c as]| @@ -214,7 +214,7 @@ violoncello = \notes \relative c { [g,: bes: c: des:][f,: bes: c: des:]| [e,: g: bes: des:][c: e: g: c:]| %shared with cello from here on - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [f,8\p\< as c des][es, g b c]| [des, f a bes][c, es g as]| @@ -275,7 +275,7 @@ violoncello = \notes \relative c { %180 [g(e' c d][g e c )g~]| [g(f' d f][g f d )g,~]| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [g\<(e' c d][g e c )g~]| [g(d' b d][g d b )g~]| @@ -295,7 +295,7 @@ violoncello = \notes \relative c { [a( g' e g][a g e )a,~]| %195 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line [a8\<( f' d f][a f d )a~]| [a( e' cis e][a e cis )g]| @@ -315,7 +315,7 @@ violoncello = \notes \relative c { f r fis r| g r g r| g r g r| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line g r g\< r| @@ -377,7 +377,7 @@ violoncello = \notes \relative c { %250 )es4 r r r8 es(| )b4 r r r8 b(| - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line )c4\< r r r8 c(| )f4 r r r8 f,(| @@ -391,7 +391,7 @@ violoncello = \notes \relative c { bes\f| %260 - \property Voice.crescendoText = #"cresc." + \property Voice.crescendoText = #'(lines " " "cresc." " ") \property Voice.crescendoSpanner = #'dashed-line as4.\p\< as'8 g4. g8| f4. f8 es4. es8| @@ -435,7 +435,7 @@ violoncello = \notes \relative c { f,4-. g-. r2| %290 - \property Voice.decrescendoText = #"dim." + \property Voice.decrescendoText = #'(lines " " "dim." " ") \property Voice.decrescendoSpanner = #'dashed-line as4\> r b r| R1| @@ -448,7 +448,7 @@ violoncello = \notes \relative c { c4 r r2| [c8-.-"arco" es-.][es()d][d-. as'-.][as()g]| R1 - \property Voice.decrescendoText = #"sempre pi\\`u piano" + \property Voice.decrescendoText = #'(lines " " "sempre pi\\`u piano" " ") % urg, "" is assumed to be hairpin... %\property Voice.decrescendoSpanner = #"" \property Voice.decrescendoSpanner = #'dashed-line diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm index a74265b9a7..b12860eeb9 100644 --- a/scm/documentation-lib.scm +++ b/scm/documentation-lib.scm @@ -132,7 +132,7 @@ Add a ref if REF is set "\n@dircategory GNU music project" "\n@direntry" ;; prepend GNU for dir, must be unique - "\n* GNU " name " (" file-name "). " name "." + "\n* GNU " name ": (" file-name "). " name "." "\n@end direntry" (node "Top") ",(lilypond)Index,(lilypond)Development," top "\n@top" diff --git a/scm/grob-description.scm b/scm/grob-description.scm index 3b302aa63d..d57c4e140d 100644 --- a/scm/grob-description.scm +++ b/scm/grob-description.scm @@ -304,6 +304,7 @@ (MultiMeasureRest . ( (spacing-procedure . ,Multi_measure_rest::set_spacing_rods) (molecule-callback . ,Multi_measure_rest::brew_molecule) + (Y-offset-callbacks . (,Staff_symbol_referencer::callback)) (staff-position . 0) (expand-limit . 10) (padding . 2.0) ; staffspace @@ -344,14 +345,14 @@ (meta . ,(grob-description "Glissando" line-spanner-interface)) )) - (FollowThread . ( + (VoiceFollower . ( (type . line) (gap . 0.5) (breakable . #t) (X-extent-callback . #f) (Y-extent-callback . #f) (molecule-callback . ,Line_spanner::brew_molecule) - (meta . ,(grob-description "FollowThread" + (meta . ,(grob-description "VoiceFollower" line-spanner-interface)) )) diff --git a/scm/translator-description.scm b/scm/translator-description.scm index b6df65af41..c9680e8b28 100644 --- a/scm/translator-description.scm +++ b/scm/translator-description.scm @@ -114,7 +114,7 @@ interesting items (ie. note heads, lyric syllables and normal rests)" "A2_engraver" "Part combine engraver for orchestral scores. -The markings @emph{@`{a}2}, @emph{Solo} and @emph{Solo II}, are +The markings @emph{a2}, @emph{Solo} and @emph{Solo II}, are created by this engraver. It also acts upon instructions of the part combiner. Another thing that the this engraver, is forcing of stem, slur and tie directions, always when both threads are not identical; diff --git a/scm/translator-property-description.scm b/scm/translator-property-description.scm index 0747c4b9d9..56b6f9a219 100644 --- a/scm/translator-property-description.scm +++ b/scm/translator-property-description.scm @@ -119,9 +119,9 @@ set, connect all arpeggios that are found. In this way, you can make arpeggios that cross staffs. ") (translator-property-description 'createKeyOnClefChange boolean? "Print a key signature whenever the clef is changed.") -(translator-property-description 'crescendoText string? "Text to print at start of non-hairpin crecscendo, ie: @samp{cresc.}") +(translator-property-description 'crescendoText markup? "Text to print at start of non-hairpin crecscendo, ie: @samp{cresc.}") (translator-property-description 'crescendoSpanner symbol? "Type of spanner to be used for crescendi. One of: @samp{hairpin}, @samp{line}, @samp{dashed-line}, @samp{dotted-line}. If unset, hairpin type is used.") -(translator-property-description 'decrescendoText string? "Text to print at start of non-hairpin decrecscendo, ie: @samp{dim.}") +(translator-property-description 'decrescendoText markup? "Text to print at start of non-hairpin decrecscendo, ie: @samp{dim.}") (translator-property-description 'currentBarNumber integer? "Contains the current barnumber. This property is incremented at every barline. ") diff --git a/scripts/convert-ly.py b/scripts/convert-ly.py index 36f9573217..a960d24e7c 100644 --- a/scripts/convert-ly.py +++ b/scripts/convert-ly.py @@ -691,6 +691,14 @@ if 1: conversions.append (((1,3,138), conv, 'point-and-click argument changed to procedure.')) +if 1: + def conv (str): + str = re.sub ('followThread', 'followVoice', str) + str = re.sub ('FollowThread', 'VoiceFollower', str) + return str + + conversions.append (((1,3,138), conv, 'followThread -> followVoice.')) + ############################ diff --git a/scripts/lilypond-book.py b/scripts/lilypond-book.py index e395ca7d48..c452e05843 100644 --- a/scripts/lilypond-book.py +++ b/scripts/lilypond-book.py @@ -499,7 +499,7 @@ def compose_full_body (body, opts): is_fragment = 1 if 'fragment' in opts: is_fragment = 1 - if 'nonfragment' in opts: + if 'nofragment' in opts: is_fragment = 0 if is_fragment and not 'multiline' in opts: diff --git a/stepmake/stepmake/documentation-targets.make b/stepmake/stepmake/documentation-targets.make index fab3e31af9..c007a914bf 100644 --- a/stepmake/stepmake/documentation-targets.make +++ b/stepmake/stepmake/documentation-targets.make @@ -13,8 +13,10 @@ footify: deep-footify: $(deep-footify) $(sort $(wildcard $(outdir)/*/*.html)) +# why isn't this in texinfo-targets? INFO_INSTALL_FILES = $(wildcard $(addsuffix *, $(INFO_FILES))) +# should we call install-info? INFOINSTALL=$(MAKE) INSTALLATION_OUT_DIR=$(infodir) depth=$(depth) INSTALLATION_OUT_FILES="$(INFO_INSTALL_FILES)" -f $(stepdir)/install-out.sub.make local-install: install-info diff --git a/stepmake/stepmake/texinfo-rules.make b/stepmake/stepmake/texinfo-rules.make index 5b53322e92..f010dda87b 100644 --- a/stepmake/stepmake/texinfo-rules.make +++ b/stepmake/stepmake/texinfo-rules.make @@ -3,16 +3,16 @@ .SUFFIXES: .html .info .texi .texinfo $(outdir)/%.info: $(outdir)/%.texi - -$(MAKEINFO) --force -I $(outdir) --output=$@ $< + $(MAKEINFO) -I $(outdir) --output=$@ $< $(outdir)/%.html: $(outdir)/%.texi - -$(MAKEINFO) --force -I $(outdir) --output=$@ --html --no-split --no-headers $< + $(MAKEINFO) -I $(outdir) --output=$@ --html --no-split --no-headers $< # we want footers even if website builds (or is built) partly $(footify) $@ # Generic rule not possible? $(outdir)/%/%.html: $(outdir)/%.texi - -$(MAKEINFO) --force --output=$@ --html $< + $(MAKEINFO) --output=$@ --html $< # we want footers even if website builds (or is built) partly $(deep-footify) $(sort $(wildcard $(outdir)/$(*F)/*.html)) @@ -20,7 +20,7 @@ $(outdir)/%.dvi: $(outdir)/%.texi cd $(outdir); texi2dvi --batch $(