; * lisp/url/url-util.el (url-display-percentage): simplify

diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el
index b7fdd73762a06b6f90d4167455973b81d87a30a7..de8e674797555c1fd8f0f65fba04e024896e1327 100644 (file)
--- a/lisp/url/url-util.el
+++ b/lisp/url/url-util.el
@@ -193,10 +193,9 @@ Will not do anything if `url-show-status' is nil."
 ;;;###autoload
 (defun url-display-percentage (fmt _perc &rest args)
   (when (and url-show-status
-            (or (null url-current-object)
-                (not (url-silent url-current-object))))
-    (when (not (null fmt))
-      (apply 'message fmt args))))
+             (not (and url-current-object (url-silent url-current-object)))
+             fmt)
+    (apply #'message fmt args)))
 
 ;;;###autoload
 (defun url-percentage (x y)