X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fbar-line.scm;h=3fad8f8912949bf96a9944b6a1019432be850cb3;hb=ca342a542bee6a28662c88b497819c86f904fb40;hp=86d12d9b217fe8c5f70ef869ff6d2e5a718955fb;hpb=a9bf7727fb66d7a17abe31b9004c846fc781fcf9;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))))