branch: externals/ef-themes
commit aff1a244d531616387b230da7561dd7789d5798d
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Rename private function to denote its purpose
---
ef-themes.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/ef-themes.el b/ef-themes.el
index 4c77a8694d..26a1a37865 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -49,7 +49,7 @@
;;; Commands and their helper functions
-(defun ef-themes--list-enabled-themes ()
+(defun ef-themes--list-known-themes ()
"Return list of `custom-known-themes' with ef- prefix."
(seq-filter
(lambda (theme)
@@ -61,7 +61,7 @@
(defun ef-themes--select-prompt ()
"Minibuffer prompt for `ef-themes-select'."
(completing-read "Select Ef Theme: "
- (ef-themes--list-enabled-themes)
+ (ef-themes--list-known-themes)
nil t nil
'ef-themes--select-theme-history))
@@ -71,7 +71,7 @@
When called from Lisp, THEME is a symbol."
(interactive
(list (intern (ef-themes--select-prompt))))
- (mapc #'disable-theme (ef-themes--list-enabled-themes))
+ (mapc #'disable-theme (ef-themes--list-known-themes))
(load-theme theme :no-confirm))
;;; Faces and variables
