Trivial text fixes.

[lilypond.git] / input / regression / markup-user.ly

diff --git a/input/regression/markup-user.ly b/input/regression/markup-user.ly
index 9adb55d74da0a4137d2d22715d1a86139ba99329..c156c47cd8a97aa40a118a917e7643ec324fb7e4 100644 (file)
--- a/input/regression/markup-user.ly
+++ b/input/regression/markup-user.ly
@@ -1,22 +1,24 @@
 
 \header {
+  texidoc = "Users may define non-standard markup commands using
+the @code{define-markup-command} scheme macro."
+}
 
-    texidoc = "Own markup commands may be defined by using the
-    @code{def-markup-command} scheme macro."
 
+\layout { ragged-right = ##t }
+  
 
-      }
 
-\version "2.4.0" % to be updated
+\version "2.10.0"
 
-#(def-markup-command (upcase paper props str) (string?)
+#(define-markup-command (upcase paper props str) (string?)
   "Upcase the string characters. Syntax: \\upcase #\"string\""
-   (interpret-markup paper props (make-simple-markup (string-upcase str))))
-
-\score { 
-     { 
-        c''-\markup \upcase #"hello world"
-        % produces a "HELLO WORLD" markup
-    }
-    \layout { raggedright = ##t }
+  (interpret-markup paper props (make-simple-markup (string-upcase str))))
+
+
+{ 
+  c''-\markup \upcase #"hello world"
+                               % produces a "HELLO WORLD" markup
 }
+
+