X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Finit.ly;h=cf9571d58bf48a1227c20c490aca4a4492d2f69d;hb=99d9989aad878c48e5db24d6b72df32f269f1148;hp=f0d780b267d62ee0a69fc75071178551756c9e57;hpb=0b132b9108551e78a3152663a2750ad095154b9f;p=lilypond.git

diff --git a/ly/init.ly b/ly/init.ly
index f0d780b267..cf9571d58b 100644
--- a/ly/init.ly
+++ b/ly/init.ly
@@ -1,10 +1,10 @@
 % Toplevel initialisation file. 
 
 #(define-public point-and-click #f)
-#(define-public midi-debug #f)
+#(define-public midi-debug  #f)
 
 
-\version "1.9.8"
+\version "2.2.0"
 
 \include "declarations-init.ly"
 
@@ -13,12 +13,21 @@
 #(ly:set-point-and-click #f)
 
 \maininput
+% there is a problem at the end of the input file
+
+
+%%
+%% above and below message is to compensate for look ahead of the parser.
+%%
 
 #(if (and (ly:get-option 'old-relative)
+      (defined? 'input-file-name)
       (not (ly:get-option 'old-relative-used)))
   (ly:warn (string-append
 	    "\n"
-	    input-file-name ": old relative compatibility was not used.")))
+	    input-file-name ": old relative compatibility was not used."
+	)))% there is a problem at the end of the input file
+
 
 
 #(if (ly:get-option 'verbose)