From b3f5a84631ed93ed59075a7eb9dfd63dca6bad79 Mon Sep 17 00:00:00 2001 From: Deepak Goel Date: Fri, 13 Mar 2009 20:37:43 +0000 Subject: m-v corrections. --- lisp/ChangeLog | 3 +++ lisp/progmodes/flymake.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) (limited to 'lisp') diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 21c19c8b95b..13bc6595658 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -8,9 +8,12 @@ 2009-03-13 D. Goel + * ibuf-ext.el: When calling (multiple-value-bind/setq .. ls) ls -> (values-list ls) throughout. + + * progmodes/flymake.el (flymake-float-time): Ditto. * progmodes/ebrowse.el: Ditto. diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index 20fd68aa959..549bf4abe63 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -79,7 +79,7 @@ 'float-time (if (featurep 'xemacs) (lambda () - (multiple-value-bind (s0 s1 s2) (current-time) + (multiple-value-bind (s0 s1 s2) (values-list (current-time)) (+ (* (float (ash 1 16)) s0) (float s1) (* 0.0000001 s2))))))) (defalias 'flymake-replace-regexp-in-string -- cgit v1.2.1