;ELC   
;;; Compiled
;;; in Emacs version 30.2
;;; with all optimizations.


#@20 

(fn KEYWORD ERR)
(defvar use-package--warning0 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" vertico error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3011( \3021 \303 0\210\202 \304\"\266\305\306\307\310#?\205& \311\312\313\314\306\"\315#0\207\316\"\207" [use-package--warning0 (debug error) (debug error) vertico-mode :init require vertico nil t display-warning use-package format "Cannot load %s" :error :catch] 5)
(defvar use-package--warning1 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" marginalia error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3011\n \302\303\304\"0\207\305\"\207" [use-package--warning1 (debug error) eval-after-load vertico #[0 "\3011 \302 0\210\202 \303\"\266\304\305\306\307#?\205\" \310\311\312\313\305\"\314#\207" [use-package--warning1 (debug error) marginalia-mode :init require marginalia nil t display-warning use-package format "Cannot load %s" :error] 5] :catch] 4)
(defvar use-package--warning2 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" orderless error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3021* \303\304\305\306#\204 \307\310\311\312\304\"\313#\202( \3141\" \315\2110\202( 	\316\"\2620\207	\317\"\207" [completion-styles use-package--warning2 (debug error) require orderless nil t display-warning use-package format "Cannot load %s" :error (debug error) (orderless basic) :config :catch] 5)
(defvar use-package--warning3 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" consult error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3031\206 \304\305!\204 \306\305\307\310\311$\210\304\312!\204 \306\312\307\310\311$\210\313C\314\315\"\316\317!\210\320	\"\305\247?\2055 D\203B \241\266\202J \321\301B\"\266\322\315\305#\266\323C\314\324\"\316\317!\210\320	\"\312\247?\205h D\203u \241\266\202} \321\301B\"\266\322\324\312#\266\2030\207\n\325\"\207" [global-map personal-keybindings use-package--warning3 (debug error) fboundp consult-buffer autoload "consult" nil t consult-goto-line "C-x b" lookup-key [24 98] require bind-key assoc add-to-list define-key "M-g g" [134217831 103] :catch] 9)
(defvar use-package--warning4 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" corfu error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3041L \305\306	>\204 \307\306\310\305\211$\210\311\306!\210\312\306\n\"\313\306\314\315\316\317\320&)\210\32113 \322\323!0\210\2029 \324\"\266\325\326\305\327#?\205J \330\306\331\332\326\"\333#0\207\334\"\207" [custom--inhibit-theme-enable custom-known-themes custom-enabled-themes use-package--warning4 (debug error) nil use-package custom-declare-theme use-package-theme enable-theme remq custom-theme-set-variables (corfu-auto t nil nil "Customized with use-package corfu") (corfu-auto-delay 0.2 nil nil "Customized with use-package corfu") (corfu-auto-prefix 2 nil nil "Customized with use-package corfu") (corfu-cycle t nil nil "Customized with use-package corfu") (corfu-popupinfo-mode t nil nil "Customized with use-package corfu") (debug error) global-corfu-mode 1 :init require corfu t display-warning format "Cannot load %s" :error :catch] 7)
(defvar use-package--warning5 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" corfu-terminal error-message-string display-warning use-package :error] 8 (#$ . 83)])#@67 Add CAPFS as completion backends for HOOK.

(fn HOOK &rest CAPFS)
(byte-code "\3011\n \302\303\304\"0\207\305\"\207" [use-package--warning5 (debug error) eval-after-load corfu #[0 "\3011\f \302\303!0\210\202 \304\"\266\305\306\307\310#?\205# \311\312\313\314\306\"\315#\207" [use-package--warning5 (debug error) corfu-terminal-mode 1 :init require corfu-terminal nil t display-warning use-package format "Cannot load %s" :error] 5] :catch] 4)
(defalias 'my/add-cape '(macro . #[385 "\300\301D\302\303\304\305\306BEEE\207" [add-hook quote lambda nil setq-local completion-at-point-functions list] 10 (#$ . 3628)]))
(defvar use-package--warning6 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" cape error-message-string display-warning use-package :error] 8 (#$ . 83)])#@134 List of GPT backends in format: ((HOST KEY TYPE . MODELS) ...)
Example: (("api.openai.com" "sk-..." openai "gpt-4" "gpt-3.5-turbo"))
(byte-code "\30112 \3021 \303\304\305\"\210\303\304\306\"0\210\202 \307\"\266\310\311\312\313#?\205- \314\315\316\317\311\"\320#0\210\2028 \321\"\266\322\323\324\"\210\322\325\326\"\210\322\327\330\"\207" [use-package--warning6 (debug error) (debug error) add-to-list completion-at-point-functions cape-dabbrev cape-file :init require cape nil t display-warning use-package format "Cannot load %s" :error :catch add-hook makefile-mode-hook #[0 "\301\300!\210\302\303\304E\211\207" [completion-at-point-functions make-local-variable cape-dabbrev cape-file cape-keyword] 3] emacs-lisp-mode-hook #[0 "\301\300!\210\302\303\304\305F\211\207" [completion-at-point-functions make-local-variable cape-dabbrev cape-file cape-elisp-symbol cape-keyword] 4] org-mode-hook #[0 "\301\300!\210\302\303\304E\211\207" [completion-at-point-functions make-local-variable cape-dabbrev cape-file cape-dict] 3]] 5)
(defvar *gpt-list* nil (#$ . 4430))#@28 Cache of created backends.
(defvar *gptel-backends* nil (#$ . 5509))#@35 

(fn LST &optional BACKEND-NAME)#@10 

(fn B)
(defalias '%gpt-make-backend #[513 "\242\243\211\242\243\211\242\243\301\302\303	\"\"\206L \304\305\306\"!\206: \307\267\2024 \310\202: \311\202: \312\202: \305\313	#\314\315\316\317\320	&	B\211@\207" [*gptel-backends* cl-find-if make-closure #[257 "\301!\300\230\207" [V0 gptel-backend-name] 3 (#$ . 5622)] intern format "gptel-make-%s" #s(hash-table test eq purecopy t data (openai 40 anthropic 44 deepseek 48)) "OpenAI" "Claude" "Deepseek" "%s-%s" :host :key :stream t :models] 18 (#$ . 5583)])
(defvar use-package--warning7 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" gptel error-message-string display-warning use-package :error] 8 (#$ . 83)])#@10 

(fn L)
(byte-code "\3051N \306\307\310\311#\204 \312\313\314\315\307\"\316#\202I \3171C \203, @\320\321\"\322!@\210\323\324\325\"\210\323\326\327\"\210\330\331\332\"\210\330\333\326\"0\202I \334\"\2620\210\202T \335\"\266\336\337!\203\235 \340\304\341\304!\203f \310\202g \342\"\210\3431\227 \306\344\310\311#\204\200 \312\313\314\315\344\"\316#\202\222 \3451\214 \330\346\347\"0\202\222 \f\334\"\2620\210\202\235 \f\335\"\266\310\207" [*gpt-list* gptel-backend gptel-model use-package--warning7 use-package--warning8 (debug error) require gptel nil t display-warning use-package format "Cannot load %s" :error (debug error) %gpt-make-backend "Claude-Polo" last defalias my/gpt-list-models #[0 "\303!\304\305\306\"	\"\211\205 \211AA\307\310\311\"\312\313$\211\314\315\"\207" [gptel-backend *gpt-list* gptel-model gptel-backend-name cl-find-if make-closure #[257 "\211@\300\301\302\303$\207" [V0 nil string-match t] 9 (#$ . 6328)] completing-read format "Model [%s]: " nil t message "Model: %s"] 8 nil nil] my/gpt-cycle #[0 "\303!\304\305\306\"	\"\307\206 \310T	G\"	\234\311\312\313AA@@#\"\314!@\315\316\303!\n#\207" [gptel-backend *gpt-list* gptel-model gptel-backend-name cl-position-if make-closure #[257 "\300\301\302!!\230\207" [V0 gptel-backend-name %gpt-make-backend] 5 (#$ . 6328)] mod -1 %gpt-make-backend format "%s-%s" last message "Switched: %s (%s)"] 10 nil nil] global-set-key "S" gptel-send "G" :config :catch locate-library "vterm" defvar-1 boundp #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" vterm error-message-string display-warning use-package :error] 8 (#$ . 83)] (debug error) vterm (debug error) "g" #[0 "\300 \210\301\302!\207" [vterm-other-window vterm-send-string "gemini\n"] 2 nil nil]] 5)
(defvar use-package--warning9 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" projectile error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3061q \307\310	>\204 \311\310\312\307\211$\210\313\310!\210\314\310\n\"\315\310\316\")\210\3171. \320\321!0\210\2024 \322\"\266\323\324\325\"\210\f\326C\327\330\"\331\332!\210\333\"\334\247?\205P D\203] \241\266\202e \335\305B\"\266\336\330\337#\266\2030\210\202w \340\"\266\323\324\341\"\207" [custom--inhibit-theme-enable custom-known-themes custom-enabled-themes use-package--warning9 global-map personal-keybindings (debug error) nil use-package custom-declare-theme use-package-theme enable-theme remq custom-theme-set-variables (projectile-project-root-files #'(".projectile") nil nil "Customized with use-package projectile") (debug error) projectile-mode 1 :init eval-after-load projectile #[0 "\3031 \304\305\306\307\310\311#\210\306\312\310\311#\210\306\313\310\311#\210\3050\207\n\314\"\207" [projectile-project-search-path projectile-enable-caching use-package--warning9 (debug error) ("~/code/" "~/Code/") t put projectile-project-test-cmd safe-local-variable stringp projectile-project-run-cmd projectile-project-compilation-cmd :config] 4] "C-c p" lookup-key [3 112] require bind-key assoc #[0 "\300\301\302\303#\207" [use-package-autoload-keymap projectile-command-map projectile nil] 4 nil nil] add-to-list define-key #[0 "\300\301\302\303#\207" [use-package-autoload-keymap projectile-command-map projectile nil] 4 nil nil] :catch #[0 "\301\302\303#\207" [projectile-command-map define-key "t" projectile-test-project] 4]] 9)
(defvar use-package--warning10 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" magit error-message-string display-warning use-package :error] 8 (#$ . 83)])#@13 

(fn FILE)
(byte-code "\3041\265 \305\306!\204 \307\306\310\311\312$\210\305\313!\204 \307\313\310\311\312$\210\314\315\316\"\210\317\300!\203{ \2037 9\2037 J\2028 \206< 	\3209\203F \202G \300B\321\322\"\323\324!\210\325\n\"\306\247?\205\\ D\203i \241\266\202q \326\302B\"\266\327\322\306#\266\202\200 \314\315\330\"\210	\331C\321\332\"\323\324!\210\325\n\"\313\247?\205\227 D\203\244 \241\266\202\254 \326\302B\"\266\327\332\313#\266\2030\207\333\"\207" [magit-status-mode-map global-map personal-keybindings use-package--warning10 (debug error) fboundp my-magit-restore-popup autoload "magit" nil t magit-status eval-after-load magit #[0 "\3021O \303\304\305\306\"\210\304\307\310\"\210\304\311\312\"\210\304\313\314\"\210\315\316\317\320#\210\315\316\321\322#\210\315\316\321\323#\210\315\324\325\326#\210\315\324\327\330#\210\315\324\327\331#\210\332\333!\210\304\334\335\"\210\304\336\337\"\210\3400\207	\341\"\207" [magit-auto-revert-mode use-package--warning10 (debug error) nil defalias my-magit-commit #[0 "\300\301!\210\300\302!\210\300\303!\207" [magit-git-command-topdir "git add ." "git diff-index --quiet HEAD" "git commit -a -m 'magit auto commit'"] 2 nil nil] my-magit-commit-with-msg #[0 "\300\301\302\303\304!\"!\207" [magit-git-command-topdir format "git commit -a -m '%s'" read-string "commit msg: "] 5 nil nil] my-magit-push #[0 "\300 \210\301\302!\207" [my-magit-commit magit-push-current-to-upstream nil] 2 nil nil] my-magit-push-with-msg #[0 "\300 \210\301\302!\207" [my-magit-commit-with-msg magit-push-current-to-upstream nil] 2 nil nil] transient-append-suffix magit-commit "-a" ("-foo" "commit all" "--foo") "c" ("x" "stage all and commit with no msg" my-magit-commit) ("X" "stage all and commit with msg" my-magit-commit-with-msg) magit-push "-f" ("-bar" "commit all" "--bar") "p" ("x" "auto push with no msg" my-magit-push) ("X" "auto push with msg" my-magit-push-with-msg) eval (transient-define-prefix my-magit-restore-popup nil "My custom restore options." ["Restore Options" ("m" "Custom Message" "--help")] ["Restore Options" ("1" "single file" my-magit-restore-single-file) ("u" "all unstaged files" my-magit-restore-unstaged)]) my-magit-restore-single-file #[0 "\300 \301\302\"\211\205 \303\304\305\234\"!\207" [magit-unstaged-files my-pick "single file to restore: " magit-git-command-topdir format "git restore %s"] 7 nil nil] my-magit-restore-unstaged #[0 "\300 \301\302\"\207" [magit-unstaged-files mapc #[257 "\300\301\302\"!\207" [magit-git-command-topdir format "git restore %s"] 5 (#$ . 9954)]] 4 nil nil] t :config] 4] boundp #1="r" lookup-key [114] require bind-key assoc add-to-list define-key #[0 "\203 9\203 J\202 \206 	\3039\203 \202 \300B\304\305\"\306\307!\210\310\n\"\311\247?\2053 D\203@ \241\266\202H \312\302B\"\266\313\305\311#\207" [magit-status-mode-map global-map personal-keybindings #1# lookup-key [114] require bind-key assoc my-magit-restore-popup add-to-list define-key] 9] "C-x g" [24 103] :catch] 9)
(defvar use-package--warning11 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" diff-hl error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3011. \302\303!\204 \304\303\305\306\307$\210\302\310!\204 \304\310\305\306\307$\210\311\312\313\"\210\314\315\303\"\210\314\316\310\"0\207\317\"\207" [use-package--warning11 (debug error) fboundp diff-hl-mode autoload "diff-hl" nil t diff-hl-magit-post-refresh eval-after-load diff-hl #[0 "\3021	 \303\3040\207	\305\"\207" [diff-hl-draw-borders use-package--warning11 (debug error) nil t :config] 4] add-hook prog-mode-hook magit-post-refresh-hook :catch] 5)
(defvar use-package--warning12 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" yaml-mode error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3011 \3020\207\303\"\207" [use-package--warning12 (debug error) nil :catch] 4)
(defvar use-package--warning13 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" systemd error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3011: \302\303!\204 \304\303\305\306\307$\210\310\311\312\"\210\310\311\313\"\210\310\311\314\"\210\310\311\315\"\210\310\311\316\"\210\310\311\317\"\210\310\311\320\"\210\310\311\321\"0\207\322\"\207" [use-package--warning13 (debug error) fboundp systemd-mode autoload "systemd" nil t add-to-list auto-mode-alist ("\\.service\\'" . systemd-mode) ("\\.timer\\'" . systemd-mode) ("\\.target\\'" . systemd-mode) ("\\.mount\\'" . systemd-mode) ("\\.automount\\'" . systemd-mode) ("\\.slice\\'" . systemd-mode) ("\\.socket\\'" . systemd-mode) ("\\.path\\'" . systemd-mode) :catch] 5)
(defvar use-package--warning14 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" dockerfile-mode error-message-string display-warning use-package :error] 8 (#$ . 83)])#@76 Set `dockerfile-image-name' to the name of the current buffer's directory.
(byte-code "\3041\345 \305\306!\204 \307\306\310\311\312$\210\305\313!\204 \307\313\310\311\312$\210\305\314!\204+ \307\314\310\311\312$\210\315\306\316\"\210\317\320\321\"\210\322\300!\203\334 \203I 9\203I J\202J \206N 	\3239\203X \202Y \300B\324\325\"\326\327!\210\330\n\"\313\247?\205n D\203{ \241\266\202\203 \317\302B\"\266\331\325\313#\266\203\230 9\203\230 J\202\231 \206\235 	\3329\203\247 \202\250 \300B\324\333\"\326\327!\210\330\n\"\314\247?\205\275 D\203\312 \241\266\202\322 \317\302B\"\266\331\333\314#\266\203\202\340 \315\306\334\"0\210\202\353 \335\"\266\315\336\337\"\210\340\341\342\"\207" [dockerfile-mode-map global-map personal-keybindings use-package--warning14 (debug error) fboundp dockerfile-mode autoload "dockerfile-mode" nil t dockerfile-build-buffer dockerfile-build-no-cache-buffer eval-after-load #[0 "\3021 \303\304\305\306\"\210\307\310\305\"\210\3110\207	\312\"\207" [dockerfile-mode-command use-package--warning14 (debug error) "podman" defalias dockerfile-set-image-name-from-dir #[0 "\301\302 !\303\304!!\305\300!\210\306\307\"\211\207" [dockerfile-image-name file-name-directory buffer-file-name file-name-nondirectory directory-file-name make-local-variable format "%s:latest"] 5 (#$ . 14883)] add-hook dockerfile-mode-hook t :config] 4] add-to-list auto-mode-alist ("Dockerfile\\'" . dockerfile-mode) boundp #1="C-c b" lookup-key [3 98] require bind-key assoc define-key #2="C-c d" [3 100] #[0 "\203 9\203 J\202 \206 	\3039\203 \202 \300B\304\305\"\306\307!\210\310\n\"\311\247?\2053 D\203@ \241\266\202H \312\302B\"\266\313\305\311#\266\203] 9\203] J\202^ \206b 	\3149\203l \202m \300B\304\315\"\306\307!\210\310\n\"\316\247?\205\202 D\203\217 \241\266\202\227 \312\302B\"\266\313\315\316#\207" [dockerfile-mode-map global-map personal-keybindings #1# lookup-key [3 98] require bind-key assoc dockerfile-build-buffer add-to-list define-key #2# [3 100] dockerfile-build-no-cache-buffer] 9] :catch projectile #[0 "\300\301\302\303\304\305\306\307\310\311\312&\n\207" [projectile-register-project-type make ("Makefile") :compile "make b " :run "make r " :test "make test " :test-suffix "_test"] 11] add-hook makefile-mode-hook #[0 "\302\300!\210\303\302\301!\210\303\211\207" [compile-command projectile-compile-command make-local-variable "make "] 2]] 9)
(defvar use-package--warning15 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" monkeytype-mode error-message-string display-warning use-package :error] 8 (#$ . 83)])
(byte-code "\3011\n \3020\210\202 \303\"\266\304\305\306\"\207" [use-package--warning15 (debug error) nil :catch global-set-key "m" monkeytype-buffer] 4)
(defvar use-package--warning16 #[514 "\300\301\302\303!$\304\305\306#\207" [format "%s/%s: %s" multiple-cursors error-message-string display-warning use-package :error] 8 (#$ . 83)])#@39 Base directory for code repositories.
(byte-code "\3011 \302\303\304\305#?\205 \306\307\310\311\303\"\312#0\210\202  \313\"\266\314\315\316\"\210\314\317\320\"\210\314\321\322\"\210\314\323\324\"\210\314\325\326\"\207" [use-package--warning16 (debug error) require multiple-cursors nil t display-warning use-package format "Cannot load %s" :error :catch global-set-key [134217775] mc/mark-all-in-region-regexp [134217773] mc/mark-previous-like-this [134217789] mc/mark-next-like-this [134217823] mc/skip-to-previous-like-this [134217771] mc/skip-to-next-like-this] 5)
(defvar *code-dir* "~/code/" (#$ . 17881))#@53 Path to personal configuration vault, if it exists.
(defvar +personal-dir+ (byte-code "\301P\302!\205\n \211\207" [*code-dir* "h3vault/" file-directory-p] 3) (#$ . 18502))#@80 Load language setup for LANG from *code-dir*/h3LANG/elisp/setup.el.

(fn LANG)
(byte-code "\203 \301\302P!\203 \303\302P!\210\304 \210\301\207" [+personal-dir+ file-exists-p "init.el" load gnus-no-server] 3)
(defalias 'load-lang #[257 "\301\302\303!#\304!\205 \305!\207" [*code-dir* format "%sh3%s/elisp/setup.el" symbol-name file-exists-p load] 6 (#$ . 18681)])
(mapc 'load-lang '(cl c py flutter uml))