From a76bfbf944d8ac89b7581ed378f4782084aa404a Mon Sep 17 00:00:00 2001 From: Logan Hunt Date: Tue, 31 May 2022 23:23:58 -0700 Subject: User can create new category on the CLI --- database/run.lisp | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'database/run.lisp') diff --git a/database/run.lisp b/database/run.lisp index 739dc96..adee23a 100644 --- a/database/run.lisp +++ b/database/run.lisp @@ -24,12 +24,16 @@ (if start (floor (* 100 (local-time:timestamp-difference end start)))))) -(defun format-elapsed-time (run-split) +(defun run-split-format-elapsed-time (run-split) (let ((elapsed (run-split-elapsed-time run-split))) (if elapsed (format-time (make-time-alist elapsed)) "-"))) +;;(defun best-split (category-split) +;; (mito:select-dao 'run-split +;; (sxql:order-by (:- V + ;; Returns stuff like PB, best of each split, etc. (defun run-statistics (category) `((asdf . 1))) -- cgit v1.2.3-70-g09d2