diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-07-25 21:29:24 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-07-25 21:29:24 -0400 |
| commit | 670d85ea14e772836797d43101f9c5c5cc1af05e (patch) | |
| tree | f640324decb781e4439ba96f7f4c80e24ea2f350 | |
| parent | 7abaf5ccc9f11e657b6671e7a6d5a7533bba5f31 (diff) | |
| download | emacs-670d85ea14e772836797d43101f9c5c5cc1af05e.tar.gz | |
* lisp/mouse.el (popup-menu): Fix last change.
| -rw-r--r-- | lisp/ChangeLog | 9 | ||||
| -rw-r--r-- | lisp/emacs-lisp/cl-loaddefs.el | 2 | ||||
| -rw-r--r-- | lisp/mouse.el | 2 |
3 files changed, 8 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 40cded6f9cc..e249b4ab759 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2012-07-26 Stefan Monnier <monnier@iro.umontreal.ca> + * mouse.el (popup-menu): Fix last change. + +2012-07-26 Stefan Monnier <monnier@iro.umontreal.ca> + Autoload from Lisp with more care. Follow aliases when looking for function properties. * subr.el (autoloadp): New function. @@ -31,7 +35,6 @@ * emacs-lisp/byte-opt.el (byte-compile-inline-expand): * calc/calc.el (name): Use autoloadp & autoload-do-load. - 2012-07-25 Alp Aker <alp.tekin.aker@gmail.com> * international/mule-cmds.el (ucs-insert): Mark it as an obsolete @@ -88,8 +91,8 @@ 2012-07-21 Leo Liu <sdl.web@gmail.com> - * progmodes/cc-cmds.el (c-defun-name): Use - match-string-no-properties instead for consistency. + * progmodes/cc-cmds.el (c-defun-name): + Use match-string-no-properties instead for consistency. 2012-07-20 Leo Liu <sdl.web@gmail.com> diff --git a/lisp/emacs-lisp/cl-loaddefs.el b/lisp/emacs-lisp/cl-loaddefs.el index f22bda1559a..2d00aa62c20 100644 --- a/lisp/emacs-lisp/cl-loaddefs.el +++ b/lisp/emacs-lisp/cl-loaddefs.el @@ -260,7 +260,7 @@ Remove from SYMBOL's plist the property PROPNAME and its value. ;;;;;; cl-do cl-loop cl-return-from cl-return cl-block cl-etypecase ;;;;;; cl-typecase cl-ecase cl-case cl-load-time-value cl-eval-when ;;;;;; cl-destructuring-bind cl-function cl-defmacro cl-defun cl-gentemp -;;;;;; cl-gensym) "cl-macs" "cl-macs.el" "6b06545d8d17e8b902435f08be6ac0c2") +;;;;;; cl-gensym) "cl-macs" "cl-macs.el" "db390970b6e9bd057169b197d5189781") ;;; Generated autoloads from cl-macs.el (autoload 'cl-gensym "cl-macs" "\ diff --git a/lisp/mouse.el b/lisp/mouse.el index 84b76e184a8..07277a409ae 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -116,7 +116,7 @@ PREFIX is the prefix argument (if any) to pass to the command." (setq position (cond ((eq position 'point) - (let* ((pp (posn-at-point pos window)) + (let* ((pp (posn-at-point)) (xy (posn-x-y pp))) (list (list (car xy) (cdr xy)) (posn-window pp)))) ((not position) |