aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--org-d20.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/org-d20.el b/org-d20.el
index 09480e2..c1c35e1 100644
--- a/org-d20.el
+++ b/org-d20.el
@@ -122,8 +122,10 @@ the best N of them, e.g., 4d6k3."
(concat "1" chopped) chopped)))
(split (seq-map #'string-to-number (s-split "[dk]" ours)))
(times (seq-elt split 0))
- (sides (ignore-errors (seq-elt split 1)))
- (keep (ignore-errors (seq-elt split 2)))
+ (sides (when (> (seq-length split) 1)
+ (seq-elt split 1)))
+ (keep (when (> (seq-length split) 2)
+ (seq-elt split 2)))
(new-rolls '()))
(if (not sides)
(let ((rolls*