]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/ps.scm
* scm/sodipodi.scm: Add more output functions.
[lilypond.git] / scm / ps.scm
index 29d14c0e5b4229c2cd93fe0436a98addb4939859..f46dcf475f909c58f1fc89497a55641aa850a06c 100644 (file)
     (numbers->string
      (list x y width height blotdiam)) " draw_round_box"))
 
-;; TODO: use HEIGHT argument
 (define (start-system width height)
   (string-append
    "\n" (ly:number->string height)