diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2021-12-05 18:25:46 -0800 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2021-12-05 23:24:08 -0800 |
| commit | 524c42fa0eb9e4bf02d39e4d04353a354a84cebc (patch) | |
| tree | 671472c27628d7b25c8e29b894c140c3f9c9ab73 /test/lisp/net | |
| parent | af6061894598efdcb1aeebbac2283d6e1d085820 (diff) | |
| download | emacs-524c42fa0eb9e4bf02d39e4d04353a354a84cebc.tar.gz emacs-524c42fa0eb9e4bf02d39e4d04353a354a84cebc.tar.bz2 emacs-524c42fa0eb9e4bf02d39e4d04353a354a84cebc.zip | |
Prefer nil to (current-time) when either will do
* lisp/emacs-lisp/timer.el (timer-event-handler, run-at-time):
* lisp/gnus/gnus-score.el (gnus-score-date):
* lisp/gnus/gnus-search.el (gnus-search-query-parse-date)
(gnus-search-imap-handle-date):
* lisp/gnus/gnus-sum.el (gnus-user-date)
(gnus-summary-create-article):
* lisp/image-dired.el (image-dired-create-thumb-1):
* lisp/image/gravatar.el (gravatar-retrieve)
(gravatar--prune-cache):
* lisp/net/dbus.el (dbus-monitor-handler):
* lisp/net/tramp-gvfs.el (tramp-gvfs-handle-set-file-times):
* lisp/net/tramp-sh.el (tramp-sh-handle-set-file-times):
* lisp/net/tramp-sudoedit.el (tramp-sudoedit-handle-set-file-times):
* test/lisp/autorevert-tests.el (auto-revert--wait-for-revert)
(auto-revert-tests--write-file, auto-revert-test--wait-for):
* test/lisp/net/tramp-tests.el (tramp--test-print-duration):
Prefer nil to (current-time) when either will do, as this avoids
some consing. Similarly, prefer omitting (current-time) arg
when this is equivalent.
Diffstat (limited to 'test/lisp/net')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 47fa18eb806..c047f666dae 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -241,7 +241,7 @@ is greater than 10. (progn ,@body) (tramp--test-message "%s %f sec" - ,message (float-time (time-subtract (current-time) start)))))) + ,message (float-time (time-subtract nil start)))))) ;; `always' is introduced with Emacs 28.1. (defalias 'tramp--test-always |