Remove tex and texstr backends (part 1).

[lilypond.git] / ly / predefined-fretboards-init.ly

diff --git a/ly/predefined-fretboards-init.ly b/ly/predefined-fretboards-init.ly
index c8b7ff073146d47b562c8ceca88effa8e8a53b45..e999c93a4d38a0792e8156c23b91dbb97ddfa298 100644 (file)
--- a/ly/predefined-fretboards-init.ly
+++ b/ly/predefined-fretboards-init.ly
@@ -4,6 +4,8 @@
 %%%%
 %%%% (c) 2008 Carl D. Sorensen <c_sorensen@byu.edu>
 
+\version "2.11.56"
+
 %%%%% define storage structures
 
 % base-chord-shapes is an alist of chord shapes
@@ -21,6 +23,8 @@
 addChordShape =
 #(define-music-function (parser location key-symbol shape-string)
    (symbol? string?)
+   "Add chord shape @code{shape-string} to the @code{base-chord-shapes}
+alist with the key @code{key-symbol}."
    (set! base-chord-shapes 
            (acons key-symbol shape-string base-chord-shapes))
    (make-music 'SequentialMusic 'void #t))
@@ -36,6 +40,9 @@ addChordShape =
 storePredefinedDiagram =
 #(define-music-function (parser location chord tuning terse-definition)
   (ly:music? list? string?)
+  "Add predefined fret diagram defined by fret-diagram-terse definition
+string @code{terse-definition} for the chord pitches @code{chord} and
+the stringTuning @code{tuning}."
   (let* ((pitches (event-chord-pitches 
                     (car (extract-named-music chord 'EventChord))))
          (hash-key (cons tuning pitches)))