X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/ecb21060d5c1752d41d7a742be565c59b5fcb855..c73bd236f75b742ad4642ec94798987ae6e3e1e8:/lisp/emacs-lisp/generic.el?ds=sidebyside

diff --git a/lisp/emacs-lisp/generic.el b/lisp/emacs-lisp/generic.el
index f041de2b1d..99016d7c43 100644
--- a/lisp/emacs-lisp/generic.el
+++ b/lisp/emacs-lisp/generic.el
@@ -205,7 +205,7 @@ See the file generic-x.el for some examples of `define-generic-mode'."
     (setq font-lock-defaults '(generic-font-lock-keywords))
 
     ;; Call a list of functions
-    (mapcar 'funcall function-list)
+    (mapc 'funcall function-list)
 
     (run-mode-hooks mode-hook)))