X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=ly%2Fstring-tunings-init.ly;h=c951bec00f0b5ec08f10cb42d637a4a8a3a8a741;hb=45c74ecea916a2912bf9c8a3b0d4362bd331b3a0;hp=d3e4f54d57ca17b631138159e52562a9fe0d2b21;hpb=3170fd65067a96ea861c173c81fce5f0e127762e;p=lilypond.git

diff --git a/ly/string-tunings-init.ly b/ly/string-tunings-init.ly
index d3e4f54d57..c951bec00f 100644
--- a/ly/string-tunings-init.ly
+++ b/ly/string-tunings-init.ly
@@ -1,6 +1,6 @@
 %%%% This file is part of LilyPond, the GNU music typesetter.
 %%%%
-%%%% Copyright (C) 2010--2011 Carl D. Sorensen <c_sorensen@byu.edu>
+%%%% Copyright (C) 2010--2012 Carl D. Sorensen <c_sorensen@byu.edu>
 %%%%
 %%%% LilyPond is free software: you can redistribute it and/or modify
 %%%% it under the terms of the GNU General Public License as published by
@@ -15,7 +15,7 @@
 %%%% You should have received a copy of the GNU General Public License
 %%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 
-\version "2.15.16"
+\version "2.16.0"
 
 %%  A stringTuning is a list of pitches ordered by string number
 %%  from 1 to N.
@@ -49,6 +49,7 @@ for documentation purposes.")
 \makeDefaultStringTuning #'guitar-tuning \stringTuning <e, a, d g b e'>
 \makeDefaultStringTuning #'guitar-seven-string-tuning \stringTuning <b,, e, a, d g b e'>
 \makeDefaultStringTuning #'guitar-drop-d-tuning \stringTuning <d, a, d g b e'>
+\makeDefaultStringTuning #'guitar-drop-c-tuning \stringTuning <c, g, c f a d'>
 \makeDefaultStringTuning #'guitar-open-g-tuning \stringTuning <d, g, d g b d'>
 \makeDefaultStringTuning #'guitar-open-d-tuning \stringTuning <d, a, d fis a d'>
 \makeDefaultStringTuning #'guitar-dadgad-tuning \stringTuning <d, a, d g a d'>
@@ -75,8 +76,8 @@ for documentation purposes.")
 %% ukulele tunings
 \makeDefaultStringTuning #'ukulele-tuning \stringTuning <g' c' e' a'>
 \makeDefaultStringTuning #'ukulele-d-tuning \stringTuning <a' d' fis' b'>
-\makeDefaultStringTuning #'tenor-ukulele-tuning \stringTuning <a' e' c' g>
-\makeDefaultStringTuning #'baritone-ukulele-tuning \stringTuning <e' b g d>
+\makeDefaultStringTuning #'tenor-ukulele-tuning \stringTuning <g c' e' a'>
+\makeDefaultStringTuning #'baritone-ukulele-tuning \stringTuning <d g b e'>
 
 %% orchestral strings
 \makeDefaultStringTuning #'violin-tuning \stringTuning <g d' a' e''>
@@ -87,5 +88,5 @@ for documentation purposes.")
 defaultStringTunings = #(reverse! defaultStringTunings)
 
 %% convert 5-string banjo tuning to 4-string by removing the 5th string
-"four-string-banjo" = #(lambda (tuning)
+four-string-banjo = #(lambda (tuning)
 			 (take tuning 4))