diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2022-04-19 11:52:59 (GMT) |
|---|---|---|
| committer | Ravi R Kiran <aine.marina@gmail.com> | 2022-04-19 11:52:59 (GMT) |
| commit | 990e728d0d4725167c9d9110d815dd1efd2f73f2 (patch) | |
| tree | df9764be82620d81f6a733f2d17089a1a423db6d /lisp | |
| parent | 26067be3a4d90df83bcc9cd0364c185b6f2fa68b (diff) | |
| download | dotemacs-990e728d0d4725167c9d9110d815dd1efd2f73f2.zip dotemacs-990e728d0d4725167c9d9110d815dd1efd2f73f2.tar.gz dotemacs-990e728d0d4725167c9d9110d815dd1efd2f73f2.tar.bz2 | |
Remove dependence on cl
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ravi-init-cpp.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ravi-init-cpp.el b/lisp/ravi-init-cpp.el index 4f3327d..4c3e97f 100644 --- a/lisp/ravi-init-cpp.el +++ b/lisp/ravi-init-cpp.el @@ -24,9 +24,11 @@ ;;; Code: +(require 'cl-lib) + ; Generate a random string (of letters and numbers) of a given length (defun ravi-random-ucn-string (len) - (coerce (loop for i below len for x = (random 36) collect + (coerce (cl-loop for i below len for x = (random 36) collect (+ x (cond ((< x 10) 48) ((< x 36) (- 65 10)) |