;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'use-package-core) #@148 Normalize the arguments to diminish down to a list of one of two forms: SYMBOL (SYMBOL . STRING) (fn NAME LABEL ARG &optional RECURSED) (defalias 'use-package-normalize-diminish #[1027 "\204 \300!C\207\211\205\2119\262\203C\207;\203$\300!BC\207:\2032A;\2032C\207\211\204L<\203LA<\203L\301\302\303#\"\207\304P\305\306\"\207" [use-package-as-mode mapcar make-closure #[257 "\302\300\301\303$@\207" [V0 V1 use-package-normalize-diminish t] 6 "\n\n(fn X)"] " wants a string, symbol, (symbol . string) or list of these" error "use-package: %s"] 9 (#$ . 116)]) #@26 (fn NAME KEYWORD ARGS) (defalias 'use-package-normalize/:diminish #[771 "\300\301!\302\303\"\304$\207" [use-package-as-one symbol-name apply-partially use-package-normalize-diminish t] 9 (#$ . 720)]) #@36 (fn NAME KEYWORD ARG REST STATE) (defalias 'use-package-handler/:diminish #[1285 "\300#\301\302\"D\303\304\305\306\305\306C\"\"\"\207" [use-package-process-keywords mapcar #[257 "\300\301:\203\302\303@DAE\202\302\303DDE\207" [if (fboundp 'diminish) diminish quote] 6 "\n\n(fn VAR)"] apply append delete nil] 14 (#$ . 932)]) (byte-code "\300\301\302\303#\210\304\305!\207" [add-to-list use-package-keywords :diminish t provide use-package-diminish] 4)