]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-texstr.scm
* lily/modified-font-metric.cc (text_dimension): try
[lilypond.git] / scm / output-texstr.scm
index b7e0ef4fa0edb2d877fa295068eb80cd3a661f30..c10d9bf97f1a44c4332726221d71044a3169278b 100644 (file)
   (if (string? what)
       what
       ""))
-
 (define-public (text font str)
   (call-with-output-string
    (lambda (port)
      (display (format "\\lilygetmetrics{~a~a}{~a}{1.0}{~a}\n"
-                   (hash str 10000000)
+                     
+                     (hash str TEX_STRING_HASHLIMIT)
                    (ly:font-file-name font)
                    (ly:font-file-name font)
                    str) port)