X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-event-classes.scm;h=8695bc5b78874801405a36288a8c5757e0679bfd;hb=HEAD;hp=4eebdfac0ee7627aec9cdc616fbafe7e58bcb2b1;hpb=dd9cdec4d7fb538b3a201f3b82a10b5ac9ef5f79;p=lilypond.git

diff --git a/scm/define-event-classes.scm b/scm/define-event-classes.scm
index 4eebdfac0e..8695bc5b78 100644
--- a/scm/define-event-classes.scm
+++ b/scm/define-event-classes.scm
@@ -107,7 +107,7 @@ previously defined event class."
      ((ly:make-event-class class)
       (ly:error (_ "Cannot redefine event class `~S'") class))
      ((not parentclass)
-      (ly:error (_ "Undefined parent event class `~S'" parentclass)))
+      (ly:error (_ "Undefined parent event class `~S'") parentclass))
      (else
       (hashq-set! ancestor-lookup
                   class