X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fmusic-functions.scm;h=0344e4bf58fb4599cda7d7a8cf928324ea94fd3f;hb=c829306cde358aea95ce565af8417e7e16c01669;hp=0ec10069e05bbedd5e2aa503ac74ee93564f2929;hpb=d44d9333d8318a9a1dee7a68ea8e9149877b7d4b;p=lilypond.git

diff --git a/scm/music-functions.scm b/scm/music-functions.scm
index 0ec10069e0..0344e4bf58 100644
--- a/scm/music-functions.scm
+++ b/scm/music-functions.scm
@@ -1116,7 +1116,7 @@ use GrandStaff as a context. "
 				   '()
 				   context))
       (else
-       (ly:warning (_ "unknown accidental style: ~S" style))
+       (ly:warning (_ "unknown accidental style: ~S") style)
        (make-sequential-music '()))))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;