Thinko in dots/flag collision code.
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Mon, 8 Jan 2007 08:40:27 +0000 (09:40 +0100)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Mon, 8 Jan 2007 10:24:55 +0000 (11:24 +0100)
scm/define-markup-commands.scm

index b9f8230506d546965f5f8b16d51df0b9ca061ac9..c144b7b32e8c29163c6d0fefe7b0510452cc558d 100644 (file)
@@ -1248,7 +1248,7 @@ figured bass notation"
                                                         (number->string log)))
                        (cons (+ (car attach-off) (/ stem-thickness 2)) stemy)))))
 
-    (if (and flaggl (> dir 0))
+    (if (and dots flaggl (> dir 0))
        (set! dots (ly:stencil-translate-axis dots 0.35 X)))
     (if flaggl
         (set! stem-glyph (ly:stencil-add flaggl stem-glyph)))