Revert "string-tunings-init.ly: let \contextStringTunings affect only current context."

[lilypond.git] / ly / string-tunings-init.ly

diff --git a/ly/string-tunings-init.ly b/ly/string-tunings-init.ly
index 5b2075db9613a4cd72851637fb951116166374c4..0edc1cb4248045ee675f8d4872586fbe5eeca0d2 100644 (file)
--- a/ly/string-tunings-init.ly
+++ b/ly/string-tunings-init.ly
@@ -57,9 +57,12 @@ 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.")
-  (chord->tuning parser tuning chord)
-  #{ \set stringTunings (ly:parser-lookup $parser $tuning)
-  #})
+   (begin
+     (chord->tuning parser tuning chord)
+     #{
+        \set TabStaff.stringTunings = $(ly:parser-lookup parser tuning)
+        \set FretBoards.stringTunings = $(ly:parser-lookup parser tuning)
+     #}))
 
 %% A music function for converting an alist to string-tunings
 makeDefaultStringTunings =