]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-texstr.scm
* lily/include/paper-system.hh (class Paper_system): remove
[lilypond.git] / scm / output-texstr.scm
index c10d9bf97f1a44c4332726221d71044a3169278b..767623f96041fee672388db36235ebb0a7e99065 100644 (file)
@@ -2,7 +2,7 @@
 ;;;;
 ;;;;  source file of the GNU LilyPond music typesetter
 ;;;; 
-;;;; (c)  2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+;;;; (c) 2004--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 
 (define-module (scm output-texstr))
 (define this-module (current-module))
@@ -11,6 +11,7 @@
  (guile)
  (ice-9 regex)
  (srfi srfi-13)
+ (scm framework-tex)
  (lily))
 
 (define (dummy . foo) #f)
@@ -33,5 +34,6 @@
                      (hash str TEX_STRING_HASHLIMIT)
                    (ly:font-file-name font)
                    (ly:font-file-name font)
-                   str) port)
+                   (sanitize-tex-string str))
+             port)
      )))