From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 23 Apr 2002 13:15:30 +0000 (+0000)
Subject: (acknowledge_grob):
X-Git-Tag: release/1.5.54~4
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=eaf74b3af00f2246518232055d09846b1ebe75ec;p=lilypond.git

(acknowledge_grob):
compare #'glyph as strings.
---

diff --git a/ChangeLog b/ChangeLog
index b06bd38c92..d65f487fb8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2002-04-23  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+	* lily/system-start-delimiter-engraver.cc (acknowledge_grob):
+	compare #'glyph as strings. 
+
 	* scripts/lilypond-book.py: fix by Mats. Try to import pre if available.
 
 	* scripts/ly2dvi.py (setup_environment): fix by Mats.
@@ -36,7 +39,7 @@
 
 2002-04-22  Han-Wen  <hanwen@cs.uu.nl>
 
-	* mf/feta-nummer-code.mf (code): three fixes.
+	* mf/feta-nummer-code.mf (code): fixes for 3 glyph.
 
 2002-04-21  Han-Wen  <hanwen@cs.uu.nl>
 
diff --git a/lily/system-start-delimiter-engraver.cc b/lily/system-start-delimiter-engraver.cc
index 6dd02513da..382ca4694b 100644
--- a/lily/system-start-delimiter-engraver.cc
+++ b/lily/system-start-delimiter-engraver.cc
@@ -43,8 +43,8 @@ System_start_delimiter_engraver::acknowledge_grob (Grob_info inf)
     }
   else if (System_start_delimiter::has_interface (inf.grob_l_))
     {
-      SCM gl = inf.grob_l_->get_grob_property ("glyph");
-      SCM my_gl = delim_->get_grob_property ("glyph");
+      SCM gl = scm_string_to_symbol (inf.grob_l_->get_grob_property ("glyph"));
+      SCM my_gl = scm_string_to_symbol (delim_->get_grob_property ("glyph"));
 
       /*
 	UGH UGH