X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Faccreg.scm;h=6aea74c6613f1b55134d5d09dbc8006960d5e369;hb=90e4d7057f3857da049dfda3d130017d4719bd6b;hp=a777870f1ada99bf028072155f035844741f22af;hpb=0fe24db3936774a8fb913cb14c997036db7aeb1c;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)