From 18911423f8a02b1a3f6064d91a51209fcd3d76bc Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Tue, 26 Mar 2002 23:25:19 +0000
Subject: [PATCH] lilypond-1.3.75

---
 ly/declarations-as.ly | 12 +++++++-----
 ly/init-as.fly        |  2 +-
 ly/init-as.ly         |  2 +-
 3 files changed, 9 insertions(+), 7 deletions(-)

diff --git a/ly/declarations-as.ly b/ly/declarations-as.ly
index fe4d71c552..ceae9b08aa 100644
--- a/ly/declarations-as.ly
+++ b/ly/declarations-as.ly
@@ -2,13 +2,15 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% UGH UGH UGH UGHUGH FIXME
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -> duplication!
 
-
-breve = \duration { -1 0 }
-longa = \duration { -2 0 }
-maxima = \duration { -3 0 }
+breve = \duration #'( -1 0)
+longa = \duration #'( -2 0 )
+maxima = \duration #'( -3 0 )
 
 #(eval-string (ly-gulp-file "generic-property.scm"))
 
+% urg, move to basic property?
+#(eval-string (ly-gulp-file "slur.scm"))
+
 \include "nederlands.ly"		% dutch
 \include "chord-modifiers.ly"
 \include "script.ly"
@@ -28,7 +30,7 @@ center=0
 
 break =  \penalty  -1000000; 
 nobreak =  \penalty 1000000; 
-\include "scales.ly"
+\include "scale-definitions.ly"
 
 
 melisma = \property Staff.melismaBusy = ##t
diff --git a/ly/init-as.fly b/ly/init-as.fly
index e076e4467b..4697e96c22 100644
--- a/ly/init-as.fly
+++ b/ly/init-as.fly
@@ -33,7 +33,7 @@
     \paper_as_nine
     %linewidth=-1.0;
     %indent = 0.0;
-    \translator { \StaffContext barSize = #'staff-height }
+    \translator { \StaffContext barSize = \staffheight; }
 
     % no beam-slope
     %\translator { \VoiceContext beamHeight = #0; }
diff --git a/ly/init-as.ly b/ly/init-as.ly
index ce7099b426..c24c19d257 100644
--- a/ly/init-as.ly
+++ b/ly/init-as.ly
@@ -27,7 +27,7 @@
 
 \paper {
     \paper_as_nine
-    \translator { \StaffContext barSize = #'staff-height }
+    \translator { \StaffContext barSize = \staffheight; }
 
     % no beam-slope
     %\translator { \VoiceContext beamHeight = #0; }
-- 
2.39.5