X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fbar-line.scm;h=3fad8f8912949bf96a9944b6a1019432be850cb3;hb=HEAD;hp=86d12d9b217fe8c5f70ef869ff6d2e5a718955fb;hpb=a1267e20afa61258ce3031f07d916e0e66ac6582;p=lilypond.git

diff --git a/scm/bar-line.scm b/scm/bar-line.scm
index 86d12d9b21..3fad8f8912 100644
--- a/scm/bar-line.scm
+++ b/scm/bar-line.scm
@@ -512,7 +512,7 @@ opening bracket will be drawn, for @code{RIGHT} we get the closing bracket."
                                               (interval-start extent)
                                               Y))))
 
-    (if (eq? dir LEFT)
+    (if (eqv? dir LEFT)
         stencil
         (ly:stencil-scale stencil -1 1))))