]> git.donarmstrong.com Git - lilypond.git/commitdiff
* scm/define-markup-commands.scm (fill-line): use stack-stencils
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 19 Nov 2004 23:52:13 +0000 (23:52 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 19 Nov 2004 23:52:13 +0000 (23:52 +0000)
iso. stack-stencils-line. Fixes putting centered objects into
fill-line.

* lily/bar-line.cc (get_staff_bar_size): backport for bar y-size
fix.

ChangeLog
THANKS
lily/bar-line.cc
lily/parser.yy
scm/define-markup-commands.scm
scm/framework-tex.scm
scripts/convert-ly.py

index f121587c85396f32918aace1dbfd5c52a70726c8..6b81eb7e1c584fd65f180ef9c505e880f5e2a853 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,52 +1,29 @@
-2004-11-08  Han-Wen Nienhuys  <hanwen@xs4all.nl>
-
-       * lily/grace-engraver.cc (start_translation_timestep): split
-       scm_cadddr
-       
-2004-11-07  Han-Wen Nienhuys  <hanwen@xs4all.nl>
-
-       * lily/quote-iterator.cc (Module): remove old quote-iterator
-
-       * scm/define-music-types.scm (music-descriptions): move
-       NewQuoteMusic over QuoteMusic
-
-       * Documentation/user/notation.itely (Formatting cue notes): use
-       \cueDuring.
-
-       * lily/new-quote-iterator.cc (quote_ok): new function.
+2004-11-20  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
-       * input/regression/quote-cue-during.ly: new file.
+       * scm/define-markup-commands.scm (fill-line): use stack-stencils
+       iso. stack-stencils-line. Fixes putting centered objects into
+       fill-line.
 
-       * input/regression/quote-grace.ly: new file.
+       * lily/bar-line.cc (get_staff_bar_size): backport for bar y-size
+       fix.
 
-       * scm/define-context-properties.scm (Module): change definition of
-       graceSettings
+2004-11-19  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
-       * lily/context-property.cc (Module): rename from
-       translator-property.cc
+       * scripts/convert-ly.py (conv): backport convert-ly warnings.
 
-       * lily/context.cc (context_name_symbol): new function
+2004-11-12  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
-       * lily/grace-engraver.cc: new file. Set properties for grobs based
-       on the grace-ness of now_moment().
-
-       * scm/music-functions.scm (add-grace-property): use list
-       iso. vector for graceSettings
-       remove set-{start,stop}-grace-properties. 
-
-       * lily/new-quote-iterator.cc (construct_children): set
-       quote_outlet_ if no quoted-context-{id,type} specified.
-
-       * scripts/convert-ly.py (conv): \quote -> \quoteDuring.
-
-       * lily/parser.yy (command_element): remove \quote.
-
-       * ly/music-functions-init.ly (location): add quoteDuring music
-       function. 
+       * lily/parser.yy:
+       (re_rhythmed_music): search for first Voice with context-id. This
+       fixes addlyrics-second-staff.ly
+       
+2004-11-07  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
        * lily/lexer.ll: allow \encoding in lyrics as well.  Remove
        optional semicolon. (backportme)
 
+       * VERSION: release 2.4.2
+       
 2004-11-06  Jan Nieuwenhuizen  <janneke@gnu.org>
 
        * python/GNUmakefile (STEPMAKE_TEMPLATES): Unset USER_LDFLAGS, no
 
 2004-11-06  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
-       * scm/define-music-properties.scm (all-music-properties): add
-       quoted-context-type, quoted-context-id.
-
-       * scm/lily.scm (type-check-list): new function.
-       
-       * scm/lily-library.scm: new file. Generic library routines.
-
-       * lily/parser.yy (Generic_prefix_music): move typechecking out of
-       parser.
-
-       * ly/music-functions-init.ly: add quoteDuring function.
-
-       * lily/include/music-iterator.hh (class Music_iterator): rename
-       set_translator -> set_context
-
-       * lily/parser.yy (Generic_prefix_music_scm): add
-       MUSIC_FUNCTION_SCM_SCM_MUSIC
-
        * scm/lily.scm (sanitize-command-option): new function. (backportme)
 
        * scm/framework-tex.scm (header): sanitize TeX paper size.
 
 2004-11-05  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
-       * mf/GNUmakefile: use Fedora-3 in download link. (backportme.)
+       * mf/GNUmakefile: use Fedora-3 in download link. 
 
        * scm/framework-tex.scm (convert-to-dvi): use ly:system for
-       invoking latex. (backportme.)
-
+       invoking latex.
+       
        * lily/stem.cc (off_callback): center stems for all rest stems.
 
 2004-11-05  Werner Lemberg  <wl@gnu.org>
        PACKAGE_NAME defined in the VERSION file.
 
 2004-11-04  Han-Wen Nienhuys  <hanwen@xs4all.nl>
-  
-       * lily/beam.cc (rest_collision_callback): use local beam
-       multiplicity.
-
-       * input/regression/stem-stemlet.ly: new file.
 
-       * lily/stem.cc (add_head): store rests as well.
-
-       * scm/define-grob-properties.scm (all-user-grob-properties): add
-       stemlet-length
-
-       * lily/stem.cc: store rests as well.
-       
        * input/regression/new-slur.ly: mention forcing.
 
 2004-11-04  Werner Lemberg  <wl@gnu.org>
diff --git a/THANKS b/THANKS
index b748ab65d2dd067922fb85c40cdf23ca452c4304..66b8a37a5eaca93263f3d94899a4b92669586c20 100644 (file)
--- a/THANKS
+++ b/THANKS
@@ -1,26 +1,4 @@
 
-Release 2.5
-***********
-
-
-DEVELOPMENT TEAM
-
-Han-Wen Nienhuys  - Core development
-Jan Nieuwenhuizen - Core development
-Erik Sandberg     - Bug Meister
-Pedro Kroger      - Build Meister
-Graham Percival   - Documentation Editor
-
-CONTRIBUTORS
-
-Werner Lemberg
-Heikki Junes
-
-BUG HUNTERS/SUGGESTIONS
-
-Fernando Pablo Lopez-Lezcano
-Jack O'Quin
-
 Release 2.4
 ***********
 
@@ -49,6 +27,7 @@ Werner Lemberg
 
 BUG HUNTERS/SUGGESTIONS
 
+Arjan Bos
 Antti Kaihola
 Bertalan Fodor
 Brian Clements
index d2f50ca0733a6db951fbc91ad6deb97e262e5f9a..c93fbf0a1de04791271ec5a5a294b11ea1bf9a84 100644 (file)
@@ -204,7 +204,9 @@ Bar_line::get_staff_bar_size (SCM smob)
        calculation. That's a nonsense value, which would collapse the
        barline so we return 0.0 in the next alternative.
       */
-      return scm_make_real ((Staff_symbol_referencer::line_count (me) -1) * ss);
+      Real ysize = (Staff_symbol_referencer::line_count (me) -1);
+      ysize = ysize * ss  + Staff_symbol_referencer::line_thickness (me);
+      return scm_make_real (ysize);
     }
   else
     return scm_int2num (0);
index 1c33a0108270762c88c3199fbd5a005e994d4fc2..79dd3273c05c1dc00924f0bdb8257941b2d176a8 100644 (file)
@@ -100,6 +100,20 @@ is_regular_identifier (SCM id)
   return v;
 }
 
+
+SCM
+get_first_context_id (SCM type, Music *m)
+{
+       SCM id = m->get_property ("context-id");
+       if (SCM_BOOL_T == scm_equal_p (m->get_property ("context-type"), type)
+           && scm_is_string (m->get_property ("context-id"))
+           && scm_c_string_length (id) > 0)
+       {
+               return id;
+       }
+       return SCM_EOL;
+}
+
 SCM
 make_simple_markup (SCM encoding, SCM a)
 {
@@ -1266,11 +1280,15 @@ new_lyrics:
 
 re_rhythmed_music:
        Grouped_music_list new_lyrics {
-
-               SCM name = $1->get_property ("context-id");
-               //if (name == SCM_EOL)
+               Music * voice = $1;
+               SCM name = get_first_context_id (scm_makfrom0str ("Voice"), voice); 
                if (!scm_is_string (name))
-                       name = scm_makfrom0str ("");
+               {
+                       name = get_next_unique_context ();
+                       voice = context_spec_music (scm_makfrom0str ("Voice"),
+                                                   name,
+                                                   voice, SCM_EOL);
+               }
 
                SCM context = scm_makfrom0str ("Lyrics");
                Music *all = MY_MAKE_MUSIC ("SimultaneousMusic");
@@ -1284,12 +1302,10 @@ re_rhythmed_music:
                                get_next_unique_context (), com, SCM_EOL);
                        lst = scm_cons (csm->self_scm (), lst);
                }
-               /* FIXME: only first lyric music is accepted,
-                         the rest is junked */
-               all->set_property ("elements", scm_cons ($1->self_scm (),
+               all->set_property ("elements", scm_cons (voice->self_scm (),
                        lst));
                $$ = all;
-               scm_gc_unprotect_object ($1->self_scm ());
+               scm_gc_unprotect_object (voice->self_scm ());
        }
        | LYRICSTO {
                THIS->lexer_->push_lyric_state ();
index 9f4c1b9b45292062577ad4bf7531356735946938..1f91c2471f52dab9f2c7831b044766378ac63b33 100644 (file)
@@ -113,7 +113,7 @@ gsave /ecrm10 findfont
                                      (make-stencil-markup (car stencils))
                                      (make-simple-markup "")))
                                stencils)))
-    (stack-stencil-line fill-space line-stencils)))
+    (stack-stencils X RIGHT fill-space line-stencils)))
   
 (define (font-markup qualifier value)
   (lambda (layout props arg)
index f0e3321a2ca9c3f6194f9244fc630e82a6b56f37..bdc89051cd1d2470ff299b9f9df7553cd0788628 100644 (file)
@@ -13,6 +13,7 @@
             (ice-9 format)
             (guile)
             (srfi srfi-13)
+            (srfi srfi-1)
             (lily))
 
 ;; FIXME: rename
      (lambda (line) (dump-line outputter line (eq? line last-line))) lines)
     (ly:outputter-dump-string outputter "\\lilypondend\n")))
 
+
 (define-public (output-preview-framework
                outputter book scopes fields basename )
   (let* ((paper (ly:paper-book-paper book))
-        (lines (ly:paper-book-systems book)))
+        (lines (ly:paper-book-systems book))
+        (first-notes-index (list-index
+                            (lambda (s) (not (ly:paper-system-title? s)))
+                            lines)))
+
     (for-each
      (lambda (x)
        (ly:outputter-dump-string outputter x))
       (define-fonts paper)
       (header-end)))
 
-    (dump-line outputter (car lines) #t)
+    (for-each
+     (lambda (l)
+       (dump-line outputter l (not (ly:paper-system-title? l))))
+     (take lines (1+ first-notes-index)))
     (ly:outputter-dump-string outputter "\\lilypondend\n")))
 
 (define-public (convert-to-pdf book name)
index 4ca282ea992ef92e0669a6edb084369c67653a2a..4ef6ea0a2d050ff7edea44e62c047b06b10a3048 100644 (file)
@@ -2077,6 +2077,9 @@ conversions.append (((2, 3, 1), conv,
                     '''\\apply -> \\applymusic'''))
 
 def conv (str):
+       if re.search ('textheight', str):
+               sys.stderr.write("\nWarning: tuning of page layout has changed. See reference manual.\n")
+               
        str = re.sub (r'\\OrchestralScoreContext', '\\Score', str)
        def func(m):
                if m.group(1) not in ['RemoveEmptyStaff',
@@ -2105,6 +2108,15 @@ conversions.append (((2, 3, 4), conv,
 
 
 
+def conv (str):
+       str = re.sub (r'lastpagefill\s*=\s*"?1"', 'raggedlastbottom = ##t', str)
+       return str
+
+conversions.append (((2, 3, 6), conv,
+                    '''lastpagefill -> raggedlastbottom'''))
+
+
+
 def conv (str):
        str = re.sub (r'\\consistsend', '\\consists', str)
        str = re.sub (r'\\lyricsto\s+("?[a-zA-Z]+"?)(\s*\\new Lyrics\s*)?\\lyrics',
@@ -2127,6 +2139,8 @@ conversions.append (((2, 3, 9), conv,
 def conv (str):
        str = re.sub (r'\\addlyrics', r'\\oldaddlyrics', str)
        str = re.sub (r'\\newlyrics', r'\\addlyrics', str)
+       if re.search (r"\\override\s*TextSpanner", str):
+               sys.stderr.write ("\nWarning: TextSpanner has been split into DynamicTextSpanner and TextSpanner\n") 
        return str
 
 conversions.append (((2, 3, 10), conv,
@@ -2157,6 +2171,8 @@ def conv (str):
        str = re.sub ('soloADue', 'printPartCombineTexts', str)
        str = re.sub (r'\\applymusic\s*#notes-to-clusters',
                      '\\makeClusters', str)
+
+       str = re.sub (r'pagenumber\s*=', 'firstpagenumber', str)
        return str
 
 conversions.append (((2, 3, 12), conv,
@@ -2206,7 +2222,16 @@ conversions.append (((2, 3, 18),
 def conv (str):
        str = re.sub (r'\\paper', r'\\layout', str)
        str = re.sub (r'\\bookpaper', r'\\paper', str)
-       str = re.sub (r'paper-set-staff-size', r'layout-set-staff-size', str)
+       if re.search ('paper-set-staff-size', str):
+               sys.stderr.write ('''\nWarning: staff size should be changed at top-level
+with
+
+  #(set-global-staff-size <STAFF-HEIGHT-IN-POINT>)
+
+''')
+               
+               
+       str = re.sub (r'#\(paper-set-staff-size', '%Use set-global-staff-size at toplevel\n% #(layout-set-staff-size', str)
        return str
 
 conversions.append (((2, 3, 22),
@@ -2226,7 +2251,6 @@ conversions.append (((2, 3, 23),
                     '''\context Foo = NOTENAME -> \context Foo = "NOTENAME"'''))
 
 
-# nothing, just to make version numbers look good.
 def conv (str):
        return str
 
@@ -2234,6 +2258,9 @@ conversions.append (((2, 4, 0),
                     conv,
                     ''))
 
+
+
+
 ################################
 #      END OF CONVERSIONS      
 ################################