X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fpredefined-fretboards-init.ly;h=d0f861a40237736e5cb065512dcf669178dc74f0;hb=57f59aac2359f93d8ee3312eb3ae3a389ddf789a;hp=b4e8ec75f0181b427e253dfb18afc09a6d00e10c;hpb=0e5d83a9ceb4a143f83d22406d7eb816314ff9f7;p=lilypond.git

diff --git a/ly/predefined-fretboards-init.ly b/ly/predefined-fretboards-init.ly
index b4e8ec75f0..d0f861a402 100644
--- a/ly/predefined-fretboards-init.ly
+++ b/ly/predefined-fretboards-init.ly
@@ -21,8 +21,8 @@
 addChordShape =
 #(define-music-function (parser location key-symbol tuning shape-definition)
    (symbol? pair? string-or-pair?)
-   "Add chord shape @code{shape-definition} to the @code{chord-shape-table}
-hash with the key @code{(cons key-symbol tuning)}."
+   (_i "Add chord shape @var{shape-definition} to the @var{chord-shape-table}
+hash with the key @var{(cons key-symbol tuning)}.")
    (hash-set! chord-shape-table
                (cons key-symbol tuning)
                shape-definition)
@@ -37,9 +37,8 @@ hash with the key @code{(cons key-symbol tuning)}."
 storePredefinedDiagram =
 #(define-music-function (parser location chord tuning diagram-definition)
   (ly:music? pair? string-or-pair?)
-  "Add predefined fret diagram defined by @code{diagram-definition}
-for the chord pitches @code{chord} and
-the stringTuning @code{tuning}."
+  (_i "Add predefined fret diagram defined by @var{diagram-definition}
+  for the chord pitches @var{chord} and the stringTuning @var{tuning}.")
   (let* ((pitches (event-chord-pitches 
                     (car (extract-named-music chord 'EventChord))))
          (hash-key (cons tuning pitches))
@@ -50,4 +49,3 @@ the stringTuning @code{tuning}."
              hash-key 
              verbose-definition))
   (make-music 'SequentialMusic 'void #t))
-