Use proper scheme lists.

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 26108fb73b94ac43e1efb4344cb0efa5ab75ec92..4b385cc4ec9393ae509a9239026ccd5eda2e1c2c 100644 (file)
--- 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