]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-ps.scm
* scripts/lilypond.py: Remove LaTeX titling kludge. Remove page
[lilypond.git] / scm / output-ps.scm
index 8e0a148643ac4bfe6f000e7dd56362200f252dce..0e75869197ebda574c9c188d42989c42c4555dd2 100644 (file)
@@ -50,7 +50,6 @@
             tuplet
             polygon
             draw-line
-            between-system-string
             define-origin
             no-origin
             start-page
     (ly:numbers->string
      (list x y width height blotdiam)) " draw_round_box"))
 
-(define (new-start-system origin dim)
+(define (start-system origin dim)
   (string-append
    "\n" (ly:number-pair->string origin) " start-system\n"
    "{\n"
    (ly:numbers->string (list breapth width depth height))
    " draw_box" ))
 
-(define (stop-system)
+(define (stop-system last?)
   "} stop-system\n")
 
-(define stop-last-system stop-system)
-
 (define (symmetric-x-triangle thick w h)
   (string-append
    (ly:numbers->string (list h w thick))