]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/framework-gnome.scm
*** empty log message ***
[lilypond.git] / scm / framework-gnome.scm
index 2eb9eae400f949acd15cdb560fa4a7e5022bddc0..fb492474b8630cab67b93fd158f9c7330f2fc36d 100644 (file)
 (define OUTPUT-SCALE (* 2.5 PIXELS-PER-UNIT))
 (define-public output-scale OUTPUT-SCALE)
 
-(define (stderr string . rest)
-  (apply format (cons (current-error-port) (cons string rest)))
-  (force-output (current-error-port)))
-
 (define (debugf string . rest)
   (if #f
       (apply stderr (cons string rest))))