From: Graham Percival <graham@percival-music.ca>
Date: Fri, 18 Jul 2008 00:23:43 +0000 (-0700)
Subject: Use proper scheme lists.
X-Git-Tag: release/2.11.53-1~11
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c14e65be8267432675b014efeda4fa7712d1485f;p=lilypond.git

Use proper scheme lists.
---

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 26108fb73b..4b385cc4ec 100644
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -79,9 +79,9 @@ easyHeadsOff = {
   \revert NoteHead #'font-series
 }
 
-aikenHeads = \set shapeNoteStyles = ##(do re mi fa #f la ti)
+aikenHeads = \set shapeNoteStyles = #'#(do re mi fa #f la ti)
 
-sacredHarpHeads = \set shapeNoteStyles = ##(fa #f la fa #f la mi)
+sacredHarpHeads = \set shapeNoteStyles = #'#(fa #f la fa #f la mi)
 
 dynamicUp = {
   \override DynamicText #'direction = #UP