[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 41a5b76 1/2: Stop cl-lib loading pcase at runtime
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] master 41a5b76 1/2: Stop cl-lib loading pcase at runtime |
Date: |
Wed, 19 Apr 2017 16:32:15 -0400 (EDT) |
branch: master
commit 41a5b76f79e2ef12a089e94406159e2d0e1fad1f
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>
Stop cl-lib loading pcase at runtime
The cause was an unexpanded pcase-defmacro in cl-loaddefs.
* lisp/emacs-lisp/autoload.el (make-autoload):
Treat pcase-defmacro like defmacro.
---
lisp/emacs-lisp/autoload.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el
index d1f3c35..90e6aec 100644
--- a/lisp/emacs-lisp/autoload.el
+++ b/lisp/emacs-lisp/autoload.el
@@ -164,7 +164,8 @@ expression, in which case we want to handle forms
differently."
((and (memq car '(easy-mmode-define-global-mode define-global-minor-mode
define-globalized-minor-mode defun defmacro
easy-mmode-define-minor-mode define-minor-mode
- define-inline cl-defun cl-defmacro cl-defgeneric))
+ define-inline cl-defun cl-defmacro cl-defgeneric
+ pcase-defmacro))
(macrop car)
(setq expand (let ((load-file-name file)) (macroexpand form)))
(memq (car expand) '(progn prog1 defalias)))