diff options
Diffstat (limited to 'lisp/nxml/rng-maint.el')
-rw-r--r-- | lisp/nxml/rng-maint.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/nxml/rng-maint.el b/lisp/nxml/rng-maint.el index da4567daf6e..56fbf12eda9 100644 --- a/lisp/nxml/rng-maint.el +++ b/lisp/nxml/rng-maint.el @@ -226,11 +226,9 @@ (defun rng-time-function (function &rest args) (let* ((start (current-time)) - (val (apply function args)) - (end (current-time))) + (val (apply function args))) (message "%s ran in %g seconds" - function - (float-time (time-subtract end start))) + function (float-time (time-since start))) val)) (defun rng-time-tokenize-buffer () |