Issue 5187 Add command for Thin Aiken noteheads (issue 326510043 by address@hidden)

[karlinhigh]

Reviewers: ,

Message:
This is my first effort at making a patch, so I could be doing things
wrong. Full description is in the patch.

Description:
Issue 5187 Add command for Thin Aiken noteheads

Added 2 shapeNoteStyles definitions, aikenThinHeads and
aikenThinHeadsMinor.
Previously, these "thin-variant" Aiken notehead styles were not
accessible in the same way as others.
The standard aikenHeads are better for matching historical music,
while these thin-variants are more readable at lower staff sizes.
This is due to the standard Aiken heads having heavier horizontal lines,
which sometimes leave little interior white space for distinguising
white notes from black ones.

Please review this at https://codereview.appspot.com/326510043/

Affected files (+4, -0 lines):
  M ly/property-init.ly


Index: ly/property-init.ly
diff --git a/ly/property-init.ly b/ly/property-init.ly
index  
4923420ffef5181bf0ade63b3d3f8904075017fa..4337024397cef03c9a23d0746a5e781e5a37b6d6  
100644
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -483,6 +483,10 @@ predefinedFretboardsOn =

 aikenHeads      = \set shapeNoteStyles = ##(do re miMirror fa sol la ti)
 aikenHeadsMinor = \set shapeNoteStyles = ##(la ti do re miMirror fa sol)
+aikenThinHeads =
+  \set shapeNoteStyles = ##(doThin reThin miThin faThin sol laThin tiThin)
+aikenThinHeadsMinor =
+  \set shapeNoteStyles = ##(laThin tiThin doThin reThin miThin faThin sol)
 funkHeads =
   \set shapeNoteStyles = ##(doFunk reFunk miFunk faFunk solFunk laFunk  
tiFunk)
 funkHeadsMinor =