]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/ly-examples/orchestra.ly
Doc-es: Oops; fix bad xref.
[lilypond.git] / Documentation / ly-examples / orchestra.ly
index 56f17685b80ab74c3cb73b9dc1b34b95545be903..6b205af903f8f9f53582db839243310e42982c51 100644 (file)
   line-width = 158\mm
 }
 
-%% markups
-#(define-markup-list-command (paragraph layout props args) (markup-list?)
-  (let ((indent (chain-assoc-get 'par-indent props 2)))
-  (interpret-markup-list layout props
-  (make-justified-lines-markup-list (cons (make-hspace-markup indent)
-  args)))))
-
-#(define-markup-command (vspace layout props amount) (number?)
-  "This produces a invisible object taking vertical space."
-  (let ((amount (* amount 3.0)))
-    (if (> amount 0)
-        (ly:make-stencil "" (cons -1 1) (cons 0 amount))
-        (ly:make-stencil "" (cons -1 1) (cons amount amount)))))
-
 %% text defs
 presto = \markup { \bold \italic "Presto" }
 div = \markup { \bold "Div." }