From b8615e3eeff1dd6bb668c6e95f31cad83b28f9b1 Mon Sep 17 00:00:00 2001
From: Adam Spiers <lilypond@adamspiers.org>
Date: Wed, 2 Nov 2011 18:08:12 +0000
Subject: [PATCH] Issue 1503 - Recognise Lydian chords

---
 Documentation/included/chord-names-jazz.ly | 1 +
 input/regression/chords-funky-ignatzek.ly  | 1 +
 ly/chord-modifiers-init.ly                 | 1 +
 3 files changed, 3 insertions(+)

diff --git a/Documentation/included/chord-names-jazz.ly b/Documentation/included/chord-names-jazz.ly
index 5be2e57a56..fdf49e9afa 100644
--- a/Documentation/included/chord-names-jazz.ly
+++ b/Documentation/included/chord-names-jazz.ly
@@ -59,6 +59,7 @@ chs =  \transpose c' c'
 	<c f g bes d'>
 	<c e g d'>	% add9
 	<c es g f'>
+	<c e g b fis'>	% Lydian
 }
 
 
diff --git a/input/regression/chords-funky-ignatzek.ly b/input/regression/chords-funky-ignatzek.ly
index 64949c23af..f154f748e8 100644
--- a/input/regression/chords-funky-ignatzek.ly
+++ b/input/regression/chords-funky-ignatzek.ly
@@ -16,6 +16,7 @@ chs =
 <c e g bes c'  d' e'>1
 <c e g a bes>1
 <c e g a d'>1
+<c e g b fis'>1
 }
 
 
diff --git a/ly/chord-modifiers-init.ly b/ly/chord-modifiers-init.ly
index 8ceb577e70..15b54b559c 100644
--- a/ly/chord-modifiers-init.ly
+++ b/ly/chord-modifiers-init.ly
@@ -30,6 +30,7 @@ ignatzekExceptionMusic = {
     \normal-size-super $(ly:wide-char->utf-8 #x00f8)
   }
   <c es ges beses>-\markup { \super  "o7" }
+  <c e g b fis'>-\markup { \super "lyd" } % Lydian
 }
 
 partialJazzMusic = {
-- 
2.39.5