X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fevent-listener.ly;h=9e5282de89d7ca33704a58fb592a62ec17c848e0;hb=9675132431ef8b44d24e8c03f1a846c9620ac5da;hp=6c0f75970e708e370195b8934801074c507f77a3;hpb=522f419e3ed3e09ecf834bbb5315ac1777ab13e0;p=lilypond.git

diff --git a/ly/event-listener.ly b/ly/event-listener.ly
index 6c0f75970e..9e5282de89 100644
--- a/ly/event-listener.ly
+++ b/ly/event-listener.ly
@@ -66,7 +66,7 @@ program using the output of this function to interpret grace notes
 however they want (half duration, quarter duration?  before beat,
 after beat?  etc.)."
    (if
-       (eq? 0 (ly:moment-grace-numerator moment))
+       (zero? (ly:moment-grace-numerator moment))
        (ly:format "~a" (format-moment moment))
        ;; grace notes have a negative numerator, so no "-" necessary
        (ly:format