diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-08-03 14:09:15 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-08-03 14:09:15 +0200 |
| commit | 4bbd1f38ca43c543f27178ba9b2b600d25711c61 (patch) | |
| tree | 049a9509409b9a5ecb1242e3d989b9e359557ac6 /lisp/url/url-util.el | |
| parent | 8a9839348fb8762c8843362595f2ca9de60d515c (diff) | |
| download | emacs-4bbd1f38ca43c543f27178ba9b2b600d25711c61.tar.gz | |
; * lisp/url/url-util.el (url-display-percentage): simplify
Diffstat (limited to 'lisp/url/url-util.el')
| -rw-r--r-- | lisp/url/url-util.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el index b7fdd73762a..de8e6747975 100644 --- 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) |