[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r110962: * lisp/emacs-lisp/byte-run.e
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r110962: * lisp/emacs-lisp/byte-run.el (defun-declarations-alist): Fix last change. |
Date: |
Tue, 20 Nov 2012 12:54:00 -0500 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 110962
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Tue 2012-11-20 12:54:00 -0500
message:
* lisp/emacs-lisp/byte-run.el (defun-declarations-alist): Fix last change.
modified:
lisp/ChangeLog
lisp/emacs-lisp/byte-run.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-11-20 04:24:09 +0000
+++ b/lisp/ChangeLog 2012-11-20 17:54:00 +0000
@@ -1,5 +1,7 @@
2012-11-20 Stefan Monnier <address@hidden>
+ * emacs-lisp/byte-run.el (defun-declarations-alist): Fix last change.
+
* subr.el (called-interactively-p-functions): New var.
(internal--called-interactively-p--get-frame): New macro.
(called-interactively-p, interactive-p): Rewrite in Lisp.
=== modified file 'lisp/emacs-lisp/byte-run.el'
--- a/lisp/emacs-lisp/byte-run.el 2012-11-19 21:30:55 +0000
+++ b/lisp/emacs-lisp/byte-run.el 2012-11-20 17:54:00 +0000
@@ -88,7 +88,7 @@
,(if (eq (car-safe compiler-function) 'lambda)
`(lambda ,(append (cadr compiler-function) args)
,@(cddr compiler-function))
- #',compiler-function)))))
+ `#',compiler-function)))))
(list 'doc-string
#'(lambda (f _args pos)
(list 'put (list 'quote f) ''doc-string-elt (list 'quote pos))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r110962: * lisp/emacs-lisp/byte-run.el (defun-declarations-alist): Fix last change.,
Stefan Monnier <=