diff options
| author | Neil Okamoto <neil.okamoto@gmail.com> | 2018-01-31 01:52:07 -0800 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar.batsov@gmail.com> | 2018-01-31 19:28:33 +0700 |
| commit | b14b44e0b276d13439c7975399c89df7adceea61 (patch) | |
| tree | cc52653af949c41d1c7ad3ffc98fc68c5cf10090 /cider-cheatsheet.el | |
| parent | e4e48eae228886e44f94e003a697b8120c58a78a (diff) | |
fix unused lexical variable
It seems like the bytecompiler in Emacs 26 and newer seems capable of optimizing
away the usage of `section` inside the while loop, but then complains that the
outer let binding is unused.
Diffstat (limited to 'cider-cheatsheet.el')
| -rw-r--r-- | cider-cheatsheet.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/cider-cheatsheet.el b/cider-cheatsheet.el index db88fd76..ed15b529 100644 --- a/cider-cheatsheet.el +++ b/cider-cheatsheet.el @@ -525,13 +525,11 @@ The list can hold one or more lists inside - one per each namespace." When you make it to a Clojure var its doc buffer gets displayed." (interactive) - (let ((section nil) - (cheatsheet-data cider-cheatsheet-hierarchy)) + (let ((cheatsheet-data cider-cheatsheet-hierarchy)) (while (stringp (caar cheatsheet-data)) (let* ((sections (mapcar #'car cheatsheet-data)) (sel-section (completing-read "Select cheatsheet section: " sections)) (section-data (seq-find (lambda (elem) (equal (car elem) sel-section)) cheatsheet-data))) - (setq section sel-section) (setq cheatsheet-data (cdr section-data)))) (cider-cheatsheet--select-var cheatsheet-data))) |