From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Tue, 9 Sep 2008 18:25:25 +0000 (+0200)
Subject: Allow grace slashes to be style-dependent
X-Git-Tag: release/2.11.58-1~10
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=96da6326a3e81ae8a3a580348f3c75b0525e6ccc;p=lilypond.git

Allow grace slashes to be style-dependent
---

diff --git a/lily/stem.cc b/lily/stem.cc
index c66712fb24..d50bd50cda 100644
--- a/lily/stem.cc
+++ b/lily/stem.cc
@@ -628,8 +628,13 @@ Stem::calc_flag (SCM smob)
       string stroke_style = ly_scm2string (stroke_style_scm);
       if (!stroke_style.empty ())
         {
-          string font_char = to_string (dir) + stroke_style;
+          string font_char = flag_style + to_string (dir) + stroke_style;
           Stencil stroke = fm->find_by_name ("flags." + font_char);
+          if (stroke.is_empty ())
+            {
+              font_char = to_string (dir) + stroke_style;
+              stroke = fm->find_by_name ("flags." + font_char);
+            }
           if (stroke.is_empty ())
             me->warning (_f ("flag stroke `%s' not found", font_char));
           else