[Emacs-diffs] /srv/bzr/emacs/trunk r110857: * lisp/emacs-lisp/bytecomp.el (byte-compile-out-toplevel): Don't turn

[Stefan Monnier]

------------------------------------------------------------
revno: 110857
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Fri 2012-11-09 10:56:51 -0500
message:
  * lisp/emacs-lisp/bytecomp.el (byte-compile-out-toplevel): Don't turn
  (funcall '(lambda ..) ..) into ((lambda ..) ..).
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/bytecomp.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-11-09 05:48:05 +0000
+++ b/lisp/ChangeLog    2012-11-09 15:56:51 +0000
@@ -1,15 +1,20 @@
+2012-11-09  Stefan Monnier  <address@hidden>
+
+       * emacs-lisp/bytecomp.el (byte-compile-out-toplevel): Don't turn
+       (funcall '(lambda ..) ..) into ((lambda ..) ..).
+
 2012-11-09  Vincent Belaïche  <address@hidden>
 
        * ses.el: symbol to coordinate mapping is made by symbol property
-       `ses-cell'. This means that the same mapping is done for all SES
-       sheets. That is good enough for cells with standard A1 names, but
-       not for named cell. So a hash map is added for those
-       latter.
-       (defconst ses-localvars): added local variable ses--named-cell-hashmap
+       `ses-cell'.  This means that the same mapping is done for all SES
+       sheets.  That is good enough for cells with standard A1 names, but
+       not for named cell.  So a hash map is added for the latter.
+       (defconst ses-localvars): Add local variable ses--named-cell-hashmap
        (ses-sym-rowcol): Use hashmap for named cell.
        (ses-is-cell-sym-p): New defun.
        (ses-decode-cell-symbol): New defun.
-       (ses-create-cell-variable): Add cell to hashmap when name is not 
A1-like.
+       (ses-create-cell-variable): Add cell to hashmap when name is not
+       A1-like.
        (ses-rename-cell): Check that cell new name is not already in
        spreadsheet with the use of ses-is-cell-sym-p
        (ses-rename-cell): Use hash map for named cells, but accept also
@@ -120,8 +125,8 @@
 
 2012-11-05  Agustín Martín Domingo  <address@hidden>
 
-       * textmodes/ispell.el (ispell-program-name): Update
-       spellchecker parameters when customized.
+       * textmodes/ispell.el (ispell-program-name):
+       Update spellchecker parameters when customized.
 
 2012-11-04  Glenn Morris  <address@hidden>
 
@@ -515,7 +520,7 @@
 2012-10-19  Stefan Monnier  <address@hidden>
 
        * minibuffer.el (minibuffer-force-complete): Make the next completion 
use
-       the same completion-field (address@hidden).
+       the same completion-field (bug#12221).
 
 2012-10-19  Martin Rudalics  <address@hidden>
 

=== modified file 'lisp/emacs-lisp/bytecomp.el'
--- a/lisp/emacs-lisp/bytecomp.el       2012-11-08 14:58:15 +0000
+++ b/lisp/emacs-lisp/bytecomp.el       2012-11-09 15:56:51 +0000
@@ -2823,7 +2823,8 @@
                   (setq body (nreverse body))
                   (setq body (list
                               (if (and (eq tmp 'funcall)
-                                       (eq (car-safe (car body)) 'quote))
+                                       (eq (car-safe (car body)) 'quote)
+                                      (symbolp (nth 1 (car body))))
                                   (cons (nth 1 (car body)) (cdr body))
                                 (cons tmp body))))
                   (or (eq output-type 'file)