From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Fri, 9 Apr 2004 23:26:39 +0000 (+0000)
Subject: (markup): take encoding from lexer.
X-Git-Tag: release/2.3.0~37
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=9939b3c0122f6276fa6108c2368cfd3e78ad7059;p=lilypond.git

(markup): take encoding from lexer.
---

diff --git a/lily/parser.yy b/lily/parser.yy
index 96746e4e62..528c4549fe 100644
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -106,7 +106,7 @@ SCM
 make_simple_markup (SCM encoding, SCM a)
 {
 	SCM simple = ly_scheme_function ("simple-markup");
-	if (gh_symbol_p (encoding))
+	if (is_symbol (encoding))
 	{
 		return scm_list_3 (ly_scheme_function ("encoded-simple-markup"),
 			   encoding, a);