patch::: 1.5.1.jcn3

* Make blot work without -fps too.

diff --git a/CHANGES b/CHANGES
index b0510c897168e7eba711759bca44200e83cfc0cc..640d803673a7412a8b249a46d365bd9758d7216e 100644 (file)
--- a/CHANGES
+++ b/CHANGES
@@ -4,6 +4,8 @@
 1.5.1.jcn2
 ==========
 
+* Make blot work without -fps too.
+
 * Use blot diameter for postscript beams and boxes.
 
 * Guile-1.5.0-cvs updates and Guile-1.4.x compatibility.

diff --git a/VERSION b/VERSION
index 5854e483d1f3e533eed86cb270bc8b585388de90..f091b0882cfb7cbee52a641db2ca1b577215d591 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -2,7 +2,7 @@ PACKAGE_NAME=LilyPond
 MAJOR_VERSION=1
 MINOR_VERSION=5
 PATCH_LEVEL=1
-MY_PATCH_LEVEL=jcn2
+MY_PATCH_LEVEL=jcn3
 
 # use the above to send patches: MY_PATCH_LEVEL is always empty for a
 # released version.

diff --git a/ps/music-drawing-routines.ps b/ps/music-drawing-routines.ps
index 0b1ddcf9c37b9674e16d6509955eaa0ceed8102b..8a64dcf6eb0936c05bb69a951e4c4f4aecbc64ea 100644 (file)
--- a/ps/music-drawing-routines.ps
+++ b/ps/music-drawing-routines.ps
@@ -4,6 +4,10 @@
 
 /blot-diameter { lilypondpaperblotdiameter } bind def
 
+/set_tex_dimen {
+       cvr def     
+} bind def
+
 /euclidean_length  
 { 
        1 copy mul exch 1 copy mul add sqrt 

diff --git a/tex/lily-ps-defs.tex b/tex/lily-ps-defs.tex
index c1ff2b18ed2c70ed1740f6d872570b045a4a586b..ab5ad6b4345fa92dd222b8859a09e66a07f77345 100644 (file)
--- a/tex/lily-ps-defs.tex
+++ b/tex/lily-ps-defs.tex
@@ -20,6 +20,7 @@
                         ##1 @endspecial}%
         }
 }
-
+\def\PSsetTeXdimen#1{\expandafter\special{! /#1 (\csname #1\endcsname) set_tex_dimen}}
+\PSsetTeXdimen{lilypondpaperblotdiameter}
 \def\turnOnExperimentalFeatures{}