X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Ftitling.scm;h=4a0eb678342c832fe7e89c8daf544b492b95422a;hb=2ceb589a4aa3060867116d8fc130fa994dc7e43a;hp=b1cb6aa2eab564669b13e50bd6b61f3b2ab9c201;hpb=97278c926fbe9d81b5fe4e090ac271e28ca6e702;p=lilypond.git

diff --git a/scm/titling.scm b/scm/titling.scm
index b1cb6aa2ea..4a0eb67834 100644
--- a/scm/titling.scm
+++ b/scm/titling.scm
@@ -126,7 +126,7 @@
 	    '())
 	(if (has 'piece)
 	    (list
-	     (markup #:fill-line (#:large #:bigger #:caps (get 'piece) "")))
+	     (markup #:fill-line (#:large #:bigger (get 'piece) "")))
 	    '())))))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;