From: Paul Eggert Date: Mon, 6 Dec 2021 03:30:27 +0000 (-0800) Subject: Fix image load timekeeping bug X-Git-Tag: emacs-29.0.90~3612^2^2~5 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=186637314dfa287b4b8178b668de92ecb57fdf1a;p=emacs.git 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. --- 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." (progn (message "Stopping animation; animation possibly too big") nil))) - (image-show-frame image n t) - (let* ((speed (image-animate-get-speed image)) - (time (current-time)) + (let* ((time (prog1 (current-time) + (image-show-frame image n t))) + (speed (image-animate-get-speed image)) (time-to-load-image (time-since time)) (stated-delay-time (/ (or (cdr (plist-get (cdr image) :animate-multi-frame-data))