From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Wed, 30 Sep 2009 13:44:45 +0000 (+0200)
Subject: Fix killCues (string=? expects two strings!)
X-Git-Tag: release/2.13.5-0~7
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=5630cf7d1b5d07e2d8981c409604965ea2b4383c;p=lilypond.git

Fix killCues (string=? expects two strings!)
---

diff --git a/ly/music-functions-init.ly b/ly/music-functions-init.ly
index 2f1f531036..718615a7e1 100644
--- a/ly/music-functions-init.ly
+++ b/ly/music-functions-init.ly
@@ -323,7 +323,7 @@ killCues =
    (music-map
     (lambda (mus)
       (if (and (string? (ly:music-property mus 'quoted-music-name))
-	       (string=? (ly:music-property mus 'quoted-context-id) "cue"))
+	       (string=? (ly:music-property mus 'quoted-context-id "") "cue"))
 	  (ly:music-property mus 'element)
 	  mus)) music))