* lisp/emacs-lisp/eieio.el (defmethod): Fix typo in last change.

This commit is contained in:
Stefan Monnier 2011-05-07 23:33:28 -03:00
parent 605c937661
commit c46626351c
2 changed files with 10 additions and 6 deletions

View file

@ -1,10 +1,14 @@
2011-05-08 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/eieio.el (defmethod): Fix typo in last change.
2011-05-07 Eli Zaretskii <eliz@gnu.org>
* mail/sendmail.el (send-mail-function): On MS-Windows, default to
mailclient-send-it even if window-system is nil. (Bug#8595)
* term/w32console.el (terminal-init-w32console): Call
get-screen-color and use its output to set the frame
* term/w32console.el (terminal-init-w32console):
Call get-screen-color and use its output to set the frame
background-mode. (Bug#8597)
2011-05-07 Stefan Monnier <monnier@iro.umontreal.ca>
@ -65,8 +69,8 @@
2011-05-05 Michael Albinus <michael.albinus@gmx.de>
* net/tramp-sh.el (tramp-do-copy-or-rename-file-out-of-band): Fix
port computation bug. (Bug#8618)
* net/tramp-sh.el (tramp-do-copy-or-rename-file-out-of-band):
Fix port computation bug. (Bug#8618)
2011-05-05 Glenn Morris <rgm@gnu.org>

View file

@ -1298,11 +1298,11 @@ Summary:
(let* ((key (if (keywordp (car args)) (pop args)))
(params (car args))
(arg1 (car params))
(args (if (consp arg1)
(fargs (if (consp arg1)
(cons (car arg1) (cdr params))
params))
(class (if (consp arg1) (nth 1 arg1)))
(code `(lambda ,args ,@(cdr args))))
(code `(lambda ,fargs ,@(cdr args))))
`(progn
;; Make sure there is a generic and the byte-compiler sees it.
(defgeneric ,method ,args