Merge branch 'lilypond/translation' of ssh://trettig@git.sv.gnu.org/srv/git/lilypond...

[lilypond.git] / input / lsr / chord-name-exceptions.ly

diff --git a/input/lsr/chord-name-exceptions.ly b/input/lsr/chord-name-exceptions.ly
index f5dabb4cceb42b222ebffb035b7e0c76a1231b26..21eda82d0b3e706dc6b70e035e08f1b03c540713 100644 (file)
--- a/input/lsr/chord-name-exceptions.ly
+++ b/input/lsr/chord-name-exceptions.ly
@@ -1,27 +1,33 @@
 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
 %% This file is in the public domain.
-%% Tags: chords
-\version "2.11.35"
+\version "2.11.49"
 
-\header { texidoc = "
-The property @code{chordNameExceptions} can used to store a list of
+\header {
+  lsrtags = "chords"
+
+  texidoc = "
+The property @code{chordNameExceptions} can be used to store a list of
 special notations for specific chords. 
-" }
-% begin verbatim
-% 7sus4 denoted with ^7 wahh
+
+"
+  doctitle = "Chord name exceptions"
+} % begin verbatim
+% modify maj9 and 6(add9)
+% Exception music is chords with markups
 chExceptionMusic = {
-  <c f g bes>1-\markup { \super "7" "wahh" }
+  <c e g b d'>1-\markup { \super "maj9" }
+  <c e g a d'>1-\markup { \super "6(add9)" }
 }
 
-% add to existing exceptions.
-chExceptions = #(append
-  (sequential-music-to-chord-exceptions chExceptionMusic #t)
+% Convert music to list and prepend to existing exceptions.
+chExceptions = #( append
+  ( sequential-music-to-chord-exceptions chExceptionMusic #t)
   ignatzekExceptions)
 
 theMusic = \chordmode {
-  c:7sus4 c:dim7/+f
+  g1:maj9 g1:6.9
   \set chordNameExceptions = #chExceptions
-  c:7sus4 c:dim7/+f
+  g1:maj9 g1:6.9
 }
 
 \layout {
@@ -31,4 +37,3 @@ theMusic = \chordmode {
 << \context ChordNames \theMusic
    \context Voice \theMusic
 >>  
-