* Documentation/user/refman.itely (Ottava brackets): more doco for

[lilypond.git] / scm / output-ps.scm

diff --git a/scm/output-ps.scm b/scm/output-ps.scm
index 22a9c9110718017bacac91b5e9267756f28b2c75..bf42f7e22c17e6e50e460ecb29dda9f788d47c79 100644 (file)
--- a/scm/output-ps.scm
+++ b/scm/output-ps.scm
@@ -233,7 +233,6 @@
   (string-append
    "%!PS-Adobe-3.0\n"
    "%%Creator: " creator generate "\n"))
-
 (define (header-end)
   (string-append
    ;; URG: now we can't use scm output without Lily
@@ -243,8 +242,8 @@
    "{ exch pop //systemdict /run get exec } "
    ;; ps-testing wreaks havoc when used with lilypond-book.
    ;;  -- is this still true with new modules system?
-   ;;   (if (defined? 'ps-testing) "\n /testing true def" "")
-   ;;   "\n /testing true def"
+;;   (if (defined? 'ps-testing) "\n /testing true def" "")
+  ;   "\n /testing true def"
    ))
 
 (define (lily-def key val)
@@ -266,7 +265,7 @@
    (numbers->string (list wid slope thick))
    " draw_repeat_slash"))
 
-(define (roundfilledbox x y width height blotdiam)
+(define (round-filled-box x y width height blotdiam)
    (string-append
     " "
     (numbers->string