X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fpart-combiner.scm;h=3d3c796cf288f7dec58a91c18ca4da8a5bb40ced;hb=a736b537c32e3b07a22ebedf3eacfeb46c57be25;hp=5730a7e005fed8912a6d3a306bcb05fd6d12fd10;hpb=11e48c5a2cd4525b0783552d2f05153550335be0;p=lilypond.git

diff --git a/scm/part-combiner.scm b/scm/part-combiner.scm
index 5730a7e005..3d3c796cf2 100644
--- a/scm/part-combiner.scm
+++ b/scm/part-combiner.scm
@@ -257,7 +257,7 @@ Voice-state objects
 
 (define-public (make-new-part-combine-music music-list)
   (let*
-     ((m (make-music-by-name 'NewPartCombineMusic))
+     ((m (make-music-by-name 'PartCombineMusic))
       (m1 (context-spec-music (car music-list) 'Voice "one"))
       (m2 (context-spec-music (cadr music-list) 'Voice "two"))
       (props '((denies Thread)