branch: externals/ef-themes commit aff1a244d531616387b230da7561dd7789d5798d Author: Protesilaos Stavrou <i...@protesilaos.com> Commit: Protesilaos Stavrou <i...@protesilaos.com>
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