diff options
Diffstat (limited to 'speedrun.lisp')
| -rw-r--r-- | speedrun.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/speedrun.lisp b/speedrun.lisp index d872227..b78f75d 100644 --- a/speedrun.lisp +++ b/speedrun.lisp @@ -52,8 +52,8 @@ (speedrun-start-timestamp speedrun) (get-internal-real-time) (run-split-start-time (current-split speedrun)) (local-time:now))) -;; Set the state of the speedrun to be stopped if there are no more -;; splits, or set the current split to the next one +;; Set the state of the speedrun to be stopped if there are no more splits. +;; Or, set the current split to the next one in the list. (defun next-split (speedrun) (let ((now (local-time:now))) (setf (run-split-end-time (current-split speedrun)) now) |