]> git.donarmstrong.com Git - lilypond.git/blobdiff - ly/string-tunings-init.ly
Lilypond-book docs: Remove incomplete sentence
[lilypond.git] / ly / string-tunings-init.ly
index 5bcdbfdd869efd4770595370de91033010a63b87..fade5dad3209066fd1ccea41d8a18b46cbbd3aab 100644 (file)
@@ -1,6 +1,6 @@
 %%%% This file is part of LilyPond, the GNU music typesetter.
 %%%%
-%%%% Copyright (C) 2010 Carl D. Sorensen <c_sorensen@byu.edu>
+%%%% Copyright (C) 2010--2011 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.13.46"
+\version "2.14.0"
 
 %%  A stringTuning is a list of pitches ordered by string number
 %%  from 1 to N.
@@ -57,12 +57,9 @@ newly-defined tuning.
 @{chord} must be in absolute pitches and should have the highest
 string number (generally the lowest pitch) first.  @code{tuning}
 should be a string that will be converted to a symbol.")
-   (begin
-     (chord->tuning parser tuning chord)
-     #{
-        \set TabStaff.stringTunings = $(ly:parser-lookup parser tuning)
-        \set FretBoards.stringTunings = $(ly:parser-lookup parser tuning)
-     #}))
+  (chord->tuning parser tuning chord)
+  #{ \set stringTunings = #(ly:parser-lookup $parser $tuning)
+  #})
 
 %% A music function for converting an alist to string-tunings
 makeDefaultStringTunings =