[Emacs-diffs] /srv/bzr/emacs/trunk r104926: lisp/type-break.el (timep): Avoid a byte-compiler warning.

[Juanma Barranquero]

------------------------------------------------------------
revno: 104926
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Mon 2011-07-04 03:06:33 +0200
message:
  lisp/type-break.el (timep): Avoid a byte-compiler warning.
modified:
  lisp/ChangeLog
  lisp/type-break.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-07-04 01:04:29 +0000
+++ b/lisp/ChangeLog    2011-07-04 01:06:33 +0000
@@ -1,5 +1,8 @@
 2011-07-04  Juanma Barranquero  <address@hidden>
 
+       * type-break.el (timep): Use the value of `float-time' to avoid a
+       byte-compiler warning.
+
        * server.el (server-eval-and-print): Return any result, even nil.
 
 2011-07-03  Paul Eggert  <address@hidden>

=== modified file 'lisp/type-break.el'
--- a/lisp/type-break.el        2011-07-03 23:51:42 +0000
+++ b/lisp/type-break.el        2011-07-04 01:06:33 +0000
@@ -502,7 +502,7 @@
   "If TIME is in the format returned by `current-time' then
 return TIME, else return nil."
   (condition-case nil
-      (progn (float-time time) time)
+      (and (float-time time) time)
     (error nil)))
 
 (defun type-break-choose-file ()