From ebe6277ed52adc79865ac22cc2e8ceaf5d21fd9e Mon Sep 17 00:00:00 2001 From: fred Date: Wed, 27 Mar 2002 00:59:50 +0000 Subject: [PATCH] lilypond-1.3.145 --- scm/tex.scm | 4 ++-- tex/lily-ps-defs.tex | 4 +++- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/scm/tex.scm b/scm/tex.scm index 5e358449f9..4ba31ff8b4 100644 --- a/scm/tex.scm +++ b/scm/tex.scm @@ -96,7 +96,7 @@ (define (header-end) (string-append - "\\special{! " + "\\special{\\string! " ;; URG: ly-gulp-file: now we can't use scm output without Lily (if use-regex @@ -182,7 +182,7 @@ (define (define-origin file line col) (if (procedure? point-and-click) - (string-append "\\special{src:" + (string-append "\\special{src\\string:" (point-and-click line col file) "}" ) "") diff --git a/tex/lily-ps-defs.tex b/tex/lily-ps-defs.tex index bf93221761..c1ff2b18ed 100644 --- a/tex/lily-ps-defs.tex +++ b/tex/lily-ps-defs.tex @@ -7,12 +7,14 @@ % header info (macros/defs, etc) should go into a \special{! ... }, % note the ! sign. See dvips.info for details. % +% escape the colon with \string to avoid problems with french babel +% \def\lilySpace{ } \def\turnOnPostScript{% % This sets CTM so that you get to the currentpoint % by executing a 0 0 moveto \def\embeddedps##1{% - \special{ps: @beginspecial @setspecial + \special{ps\string: @beginspecial @setspecial \lilypondpaperoutputscale\lilySpace \lilypondpaperoutputscale\lilySpace scale ##1 @endspecial}% -- 2.39.5