branch: elpa/slime
commit 1923227f542dab0c87a13aaf108ec29e06bf6841
Author: Paul Eggert <egg...@cs.ucla.edu>
Commit: Paul Eggert <egg...@cs.ucla.edu>
Simplify message timestamp formatting
* slime-tests.el (slime-wait-condition): Use format-time-string rather
than formatting by hand. This avoids relying on Emacs timestamp
format, which is slated to change.
---
slime-tests.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/slime-tests.el b/slime-tests.el
index b122119..8567b45 100644
--- a/slime-tests.el
+++ b/slime-tests.el
@@ -200,9 +200,8 @@ conditions (assertions)."
(defun slime-wait-condition (name predicate timeout)
(let ((end (time-add (current-time) (seconds-to-time timeout))))
(while (not (funcall predicate))
- (let ((now (current-time)))
- (message "waiting for condition: %s [%s.%06d]" name
- (format-time-string "%H:%M:%S" now) (cl-third now)))
+ (message "waiting for condition: %s [%s]" name
+ (format-time-string "%H:%M:%S.%6N"))
(cond ((time-less-p end (current-time))
(error "Timeout waiting for condition: %S" name))
(t
