[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/caml d3d2f5dbec 2/3: Don't use symbol-variable for local v
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/caml d3d2f5dbec 2/3: Don't use symbol-variable for local variables |
Date: |
Tue, 3 May 2022 13:58:34 -0400 (EDT) |
branch: elpa/caml
commit d3d2f5dbeccd0f415cbb28fab2015dc678e80bbd
Author: Shohei YOSHIDA <syohex@gmail.com>
Commit: Christophe Troestler <christophe.Troestler@umons.ac.be>
Don't use symbol-variable for local variables
---
caml.el | 14 +++++++-------
1 file changed, 7 insertions(+), 7 deletions(-)
diff --git a/caml.el b/caml.el
index 311d0f6f62..0f5999fd30 100644
--- a/caml.el
+++ b/caml.el
@@ -644,17 +644,17 @@ See `imenu-create-index-function'."
;; build menu
(mapc
(lambda (pair)
- (if (symbol-value (cdr pair))
+ (if (not (null (cdr pair)))
(setq menu-alist
(cons
(cons (car pair)
- (sort (symbol-value (cdr pair)) 'imenu--sort-by-name))
+ (sort (cdr pair) 'imenu--sort-by-name))
menu-alist))))
- '(("Values" . value-alist)
- ("Types" . type-alist)
- ("Modules" . module-alist)
- ("Methods" . method-alist)
- ("Classes" . class-alist)))
+ `(("Values" . ,value-alist)
+ ("Types" . ,type-alist)
+ ("Modules" . ,module-alist)
+ ("Methods" . ,method-alist)
+ ("Classes" . ,class-alist)))
(if all-alist (setq menu-alist (cons (cons "Index" all-alist) menu-alist)))
(imenu-progress-message prev-pos 100 t)
menu-alist))