diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2015-10-15 10:51:25 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2015-10-15 10:52:00 -0700 |
commit | b4c00f9ac9d57eca8f2a4950fca6198065dbdcd0 (patch) | |
tree | 46bd79c3ee39cda999f5e90bafc6d8b808fa2007 /lisp/image.el | |
parent | 5110c952069e593cb95593f7b3c41d67cb4559d6 (diff) | |
download | emacs-b4c00f9ac9d57eca8f2a4950fca6198065dbdcd0.tar.gz emacs-b4c00f9ac9d57eca8f2a4950fca6198065dbdcd0.tar.bz2 emacs-b4c00f9ac9d57eca8f2a4950fca6198065dbdcd0.zip |
Fix animation timeout delay calculation
* lisp/image.el (image-animate-timeout):
Don’t assume speed is floating-point.
Diffstat (limited to 'lisp/image.el')
-rw-r--r-- | lisp/image.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/image.el b/lisp/image.el index d557e39aac2..295b79f161d 100644 --- a/lisp/image.el +++ b/lisp/image.el @@ -735,7 +735,7 @@ for the animation speed. A negative value means to animate in reverse." ;; Subtract off the time we took to load the image from the ;; stated delay time. (delay (max (+ (* (or (cdr animation) image-default-frame-delay) - (/ 1 (abs speed))) + (/ 1.0 (abs speed))) time (- (float-time))) image-minimum-frame-delay)) done) |