Correct return value from with-elapsed-timer

diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el
index f70396195a3c3c9f5c602bb8105511df15a1bcae..35c2fad07d490c33f5d517002eb0fffb89d7e0b1 100644 (file)
--- a/lisp/use-package/use-package.el
+++ b/lisp/use-package/use-package.el
@@ -281,13 +281,14 @@
                    '(current-time))))
      ,(if use-package-verbose
           `(message "%s..." ,text))
-     ,@forms
-     ,(when use-package-verbose
-        `(let ((elapsed
-                (float-time (time-subtract (current-time) now))))
-           (if (> elapsed 0.01)
-               (message "%s...done (%.3fs)" ,text elapsed)
-             (message "%s...done" ,text))))))
+     (prog1
+         ,@forms
+       ,(when use-package-verbose
+          `(let ((elapsed
+                  (float-time (time-subtract (current-time) now))))
+             (if (> elapsed 0.01)
+                 (message "%s...done (%.3fs)" ,text elapsed)
+               (message "%s...done" ,text)))))))
 
 (put 'with-elapsed-timer 'lisp-indent-function 1)