From 3f739dba11586780f82bb91701843cee2cead017 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Tue, 26 Mar 2002 23:21:36 +0000
Subject: [PATCH] lilypond-1.3.49

---
 Documentation/faq.texi   | 21 +++++++++++++++++++++
 lily/dynamic-engraver.cc |  5 +++++
 ly/spanners.ly           | 18 ++++++++++--------
 3 files changed, 36 insertions(+), 8 deletions(-)

diff --git a/Documentation/faq.texi b/Documentation/faq.texi
index 03b04ab6e9..5934078e7f 100644
--- a/Documentation/faq.texi
+++ b/Documentation/faq.texi
@@ -308,6 +308,27 @@ tagline="Typeset by GNU LilyPond"
  
 @end example 
 
+@subsubsection Can I make blank manuscript paper with LilyPond?
+
+Theoretically, yes but it is easier to do with TeX:
+
+@example
+\def\foo{\hbox{\vrule width 15.0cm height 0.5pt depth 0.0pt}
+\nointerlineskip
+\vskip 5pt\nointerlineskip}
+\def\musicline{\vbox {
+     \foo\foo\foo\foo\foo
+}\par}
+
+\musicline
+\musicline
+\musicline
+\musicline
+\bye
+
+@end  example
+
+
 @node Development, Running, How do I -, FAQ - GNU LilyPond FAQs
 @section Development
 
diff --git a/lily/dynamic-engraver.cc b/lily/dynamic-engraver.cc
index 7ca99417dd..019ef105db 100644
--- a/lily/dynamic-engraver.cc
+++ b/lily/dynamic-engraver.cc
@@ -322,6 +322,11 @@ Dynamic_engraver::do_process_music ()
 	    }
 
 	  s = get_property (span_req_l_drul_[START]->span_type_str_ + "Spanner");
+
+
+	  /*
+	    TODO: Use symbols.
+	   */
 	  if (gh_string_p (s)) //&& ly_scm2string (s) != "hairpin")
 	    {
 	      cresc_p_->set_elt_property ("spanner", s);
diff --git a/ly/spanners.ly b/ly/spanners.ly
index 8af8a2e57d..331f11c75f 100644
--- a/ly/spanners.ly
+++ b/ly/spanners.ly
@@ -6,23 +6,25 @@ decr = \spanrequest  \start "decrescendo"
 rc = \spanrequest   \stop "crescendo"
 rced = \spanrequest \stop "decrescendo"
 
-%% urg, these don't work yet.
-%% must set manually
-xcresc = {
-%\spanrequest \start "crescendo"
-\property Voice.crescendoText = "cresc."
-\property Voice.crescendoSpanner = "dashed"
+cresc = \notes {
+  \commandspanrequest \start "crescendo" ;
+  \property Voice.crescendoText = "cresc."
+  \property Voice.crescendoSpanner = "dashed-line"
 }
 
-xendcresc = {
-%\spanrequest \start "crescendo"
+endcresc = \notes {
+\commandspanrequest \stop "crescendo"; 
 \property Voice.crescendoText = ##f
 \property Voice.crescendoSpanner = ##f
 }
 
+%{
+
 cresc = \spanrequest \start "crescendo"
 endcresc = \spanrequest \stop "crescendo"
 
+%}
+
 % better name sustainstart/stop? 
 sustaindown = \spanrequest \start "Sustain"
 sustainup = \spanrequest \stop "Sustain"
-- 
2.39.5