X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Faccreg.scm;h=6aea74c6613f1b55134d5d09dbc8006960d5e369;hb=79c17e0eaedca79e5f7605f5b9f92db27c68e679;hp=a777870f1ada99bf028072155f035844741f22af;hpb=871e7ce79ba9d6934114ae7746d2a51a8cc40a57;p=lilypond.git

diff --git a/scm/accreg.scm b/scm/accreg.scm
index a777870f1a..6aea74c661 100644
--- a/scm/accreg.scm
+++ b/scm/accreg.scm
@@ -55,7 +55,7 @@ for examples."
                                  (ly:assoc-get 'reedbanks register))))))))
 
      (define-public ,set-symbol
-       (define-music-function (parser position register)
+       (define-music-function (register)
          (string?)
          ,(format #f "Equivalent to @code{<>^\\markup \\~a@var{REGISTER}}."
                   set-symbol)