;ELC   
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.


(require 'helm)
#@15 Delete theme.
(defalias 'helm-themes--delete-theme #[0 "\301\302\"\207" [custom-enabled-themes mapc disable-theme] 3 (#$ . 103)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put helm-themes--delete-theme speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@46 Load the theme by THEME-STR.

(fn THEME-STR)
(defalias 'helm-themes--load-theme #[257 "\301\302\"\210\211\303\230\203 \304\207\305\306!\304\"\207" [custom-enabled-themes mapc disable-theme "default" t load-theme intern] 4 (#$ . 391)])
#@26 Return a list of themes.
(defalias 'helm-themes--candidates #[0 "\300\301 B\207" [default custom-available-themes] 2 (#$ . 635)])
#@35 Helm source for themes selection.
(defvar helm-themes-source (helm-make-source "Selection Theme" 'helm-source-sync :candidates 'helm-themes--candidates :action 'helm-themes--load-theme :persistent-action 'helm-themes--load-theme) (#$ . 771))
#@38 Theme selection with helm interface.
(defalias 'helm-themes #[0 "\302C\205 @\303\304#\216\305\306\307\310\204 \311\202 \312!\"\313\307\314\312!\"\315	\316\317&\2052 \320\240)\207" [custom-enabled-themes helm-themes-source nil make-closure #[0 "\300\242?\205 \303\304\n\"\210\301\205 \305\301\306\"\207" [V0 V1 custom-enabled-themes mapc disable-theme load-theme t] 3] helm :prompt format "pattern (current theme: %s): " default symbol-name :preselect "%s$" :sources :buffer "*helm-themes*" t] 11 (#$ . 1019) nil])
(provide 'helm-themes)