aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--org-d20.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/org-d20.el b/org-d20.el
index c1c35e1..ed85fee 100644
--- a/org-d20.el
+++ b/org-d20.el
@@ -131,9 +131,9 @@ the best N of them, e.g., 4d6k3."
(let ((rolls*
(org-d20--rolls-concat sign rolls (int-to-string times))))
(cons rolls* (+ total (* sign times))))
- (loop repeat times
- do (let ((new-roll (1+ (random sides))))
- (push new-roll new-rolls)))
+ (cl-loop repeat times
+ do (let ((new-roll (1+ (random sides))))
+ (push new-roll new-rolls)))
(when keep
;; TODO: This should drop the items without reordering the
;; list (spw 2019-01-05)