Add a TODO comment re grace note spacing.

[lilypond.git] / input / lsr / makam.ly

diff --git a/input/lsr/makam.ly b/input/lsr/makam.ly
index 58f1e303c09323633cb66ab331b5bcfbc75f5d54..79b8ac85401fa02fd922c06ab3c8cbf7ddaf9600 100644 (file)
--- a/input/lsr/makam.ly
+++ b/input/lsr/makam.ly
@@ -1,32 +1,23 @@
-%% Do not edit this file; it is auto-generated from LSR!
-%% Tags: pitches
+%% Do not edit this file; it is auto-generated from input/new
+%% This file is in the public domain.
+\version "2.11.35"
+\layout { ragged-right= ##t }
 \header {
-
+  doctitle = "Makam"
+  lsrtags = "pitches"
   texidoc = "Makam is Turkish type of melody that uses 1/9 tone
   microtonal alterations."
-
 }
 % begin verbatim
-
-\version "2.11.35"
-
-%{
-
-Define 1/9 alterations.
-
-%}
-
+% Define 1/9 alterations.
 
 #(define-public KOMA 1/9)
 #(define-public BAKIYE 4/9)
 #(define-public KUCUK 5/9)
 #(define-public BUYUKMUCENNEB 8/9)
 
-%{
-
-Define pitch names
 
-%}
+% Define pitch names
 
 makamPitchNames = #`(
   (c . ,(ly:make-pitch -1 0 NATURAL))
@@ -104,17 +95,10 @@ makamPitchNames = #`(
 
 )
 
-
 %% set pitch names.
 pitchnames = \makamPitchNames 
 #(ly:parser-set-note-names parser makamPitchNames)
 
-\paper
-{
-  ragged-right = ##t
-}
-
-
 makamGlyphs = #'((1 . "accidentals.doublesharp")
        (8/9 . "accidentals.sharp.slashslashslash.stemstem")
        (5/9 . "accidentals.sharp.slashslashslash.stem")
@@ -131,7 +115,6 @@ makamGlyphs = #'((1 . "accidentals.doublesharp")
 \relative {
 
   %{ define alteration <-> symbol mapping. The following glyphs are available.
-
   accidentals.sharp 
   accidentals.sharp.slashslash.stem 
   accidentals.sharp.slashslashslash.stemstem 
@@ -146,7 +129,6 @@ makamGlyphs = #'((1 . "accidentals.doublesharp")
   accidentals.flatflat 
   accidentals.flatflat.slash 
   accidentals.doublesharp 
-
   %}
 
   \override Accidental #'glyph-name-alist =  \makamGlyphs