diff --git a/lisp/gnus-score.el b/lisp/gnus-score.el
index 948c1c3b62dcebb3f71b0b97bb4f99ee5f4b00af..bc35cf3dea5ff791c8d53dd32330e584567ea1ee 100644
--- a/lisp/gnus-score.el
+++ b/lisp/gnus-score.el
@@ -1743,7 +1743,7 @@ score in `gnus-newsgroup-scored' by SCORE."
       (save-excursion
         (article-goto-body)
         (delete-region (point) (point-max))
-        (mapc 'my-mm-display-part (mm-text-parts handles))
+        (mapc #'my-mm-display-part (mm-text-parts handles))
         handles))))
 
 (defun gnus-score-body (scores header now expire &optional trace)