aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2019-01-05 17:02:35 +0000
committerSean Whitton <spwhitton@spwhitton.name>2019-01-05 17:03:38 +0000
commit0285631e0458cf716abaf534caff6d3f5cad185a (patch)
treea91c0b1a512ba1c5ddb29317e31d25e95ee322b7
parentad1425a13e64f794c04707007efcfa52bd620901 (diff)
downloadorg-d20-0285631e0458cf716abaf534caff6d3f5cad185a.tar.gz
TODO
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-rw-r--r--org-d20.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/org-d20.el b/org-d20.el
index cdb9c8b..2889839 100644
--- a/org-d20.el
+++ b/org-d20.el
@@ -110,6 +110,7 @@ the best N of them, e.g., 4d6k3."
(push new-roll new-rolls))
(setq times (- times 1)))
(when keep
+ ;; TODO this should drop the items without reordering the list
(setq new-rolls (seq-drop (sort new-rolls '<) (- times keep))))
(dolist (new-roll new-rolls)
(setq rolls (org-d20--rolls-concat sign rolls