[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/emacs-24 r108601: * lisp/emacs-lisp/edebug.
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/emacs-24 r108601: * lisp/emacs-lisp/edebug.el (edebug-read-function): Remove old incorrect |
Date: |
Fri, 02 Nov 2012 01:55:40 -0000 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 108601
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Wed 2012-06-13 11:46:29 -0400
message:
* lisp/emacs-lisp/edebug.el (edebug-read-function): Remove old incorrect
mapping from #' to function*.
modified:
lisp/ChangeLog
lisp/emacs-lisp/edebug.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-06-13 15:28:10 +0000
+++ b/lisp/ChangeLog 2012-06-13 15:46:29 +0000
@@ -1,3 +1,8 @@
+2012-06-13 Stefan Monnier <address@hidden>
+
+ * emacs-lisp/edebug.el (edebug-read-function): Remove old incorrect
+ mapping from #' to function*.
+
2012-06-13 Chong Yidong <address@hidden>
* mouse.el (mouse-drag-track): Do not set the mark if the user
=== modified file 'lisp/emacs-lisp/edebug.el'
--- a/lisp/emacs-lisp/edebug.el 2012-06-12 05:47:14 +0000
+++ b/lisp/emacs-lisp/edebug.el 2012-06-13 15:46:29 +0000
@@ -919,8 +919,7 @@
(cond ((eq ?\' (following-char))
(forward-char 1)
(list
- (edebug-storing-offsets (- (point) 2)
- (if (featurep 'cl) 'function* 'function))
+ (edebug-storing-offsets (- (point) 2) 'function)
(edebug-read-storing-offsets stream)))
((memq (following-char) '(?: ?B ?O ?X ?b ?o ?x ?1 ?2 ?3 ?4 ?5 ?6
?7 ?8 ?9 ?0))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/emacs-24 r108601: * lisp/emacs-lisp/edebug.el (edebug-read-function): Remove old incorrect,
Stefan Monnier <=