* Documentation/user/advanced.itely: removed.

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

diff --git a/scm/output-pdftex.scm b/scm/output-pdftex.scm
index 5d5702e01f78b4c453f0a02eecb419999acad170..f20f7a02aa9898c2b7add58963b1cbba09f82290 100644 (file)
--- a/scm/output-pdftex.scm
+++ b/scm/output-pdftex.scm
@@ -37,11 +37,10 @@
          (display (object-type (car name-mag-pair)))
          (display (object-type (caaar font-name-alist)))
 
-         (ly:warn (string-append
-                   "Programming error: No such font known "
-                   (car name-mag-pair) " "
+         (ly:warn "Programming error: No such font known ~S ~S"
+                   (car name-mag-pair) 
                    (ly:number->string (cdr name-mag-pair))
-                   ))
+                   )
          "") ; issue no command
        (string-append "\\" (cddr c)))
     
@@ -100,16 +99,6 @@
     (string-append "\\embeddedpdf{" (get-output-string os) "}")))
 
 
-(define (comment s)
-  (simple-format #f "% ~a\n" s))
-
-(define (end-output) 
-  (begin
-                                       ; uncomment for some stats about lily memory      
-                                       ;               (display (gc-stats))
-    (string-append "%\n\\lilypondend\n"
-                                       ; Put GC stats here.
-                  )))
 
 (define (experimental-on)
   "")