diff options
| author | Paul Eggert | 2021-12-05 19:30:27 -0800 |
|---|---|---|
| committer | Paul Eggert | 2021-12-05 23:24:09 -0800 |
| commit | 186637314dfa287b4b8178b668de92ecb57fdf1a (patch) | |
| tree | 80245386924bea2cc88ac420a3e391b47a574ae4 | |
| parent | 2bda02943b555b184f09dd1a5882e04a288f5026 (diff) | |
| download | emacs-186637314dfa287b4b8178b668de92ecb57fdf1a.tar.gz emacs-186637314dfa287b4b8178b668de92ecb57fdf1a.zip | |
Fix image load timekeeping bug
* lisp/image.el (image-animate-timeout): Fix bug that caused the
local variable time-to-load-image to be practically zero, instead
of the time it actually took to load the image. I think
this bug was introduced in 2013-02-16T03:29:30Z!rgm@gnu.org.
| -rw-r--r-- | lisp/image.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/image.el b/lisp/image.el index 87fab80aad8..cedefc038f0 100644 --- a/lisp/image.el +++ b/lisp/image.el | |||
| @@ -953,9 +953,9 @@ for the animation speed. A negative value means to animate in reverse." | |||
| 953 | (progn | 953 | (progn |
| 954 | (message "Stopping animation; animation possibly too big") | 954 | (message "Stopping animation; animation possibly too big") |
| 955 | nil))) | 955 | nil))) |
| 956 | (image-show-frame image n t) | 956 | (let* ((time (prog1 (current-time) |
| 957 | (let* ((speed (image-animate-get-speed image)) | 957 | (image-show-frame image n t))) |
| 958 | (time (current-time)) | 958 | (speed (image-animate-get-speed image)) |
| 959 | (time-to-load-image (time-since time)) | 959 | (time-to-load-image (time-since time)) |
| 960 | (stated-delay-time | 960 | (stated-delay-time |
| 961 | (/ (or (cdr (plist-get (cdr image) :animate-multi-frame-data)) | 961 | (/ (or (cdr (plist-get (cdr image) :animate-multi-frame-data)) |