;ELC ;;; Compiled ;;; in Emacs version 27.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defvar use-package--warning56 #[(keyword err) "\303\304\305\306 !$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" spell-fu error-message-string display-warning use-package :error] 6]) (byte-code "\30516\306\307\310\311#\204\312\313\314\315\307\"\316#\2022\3171,\320\321\322\323\324\"\210\322\325\326\"0\2022 \327\n\")0\202< \330\n\")\210\310\331\332\333\"\210\331\334\335\"\207" [ispell-dictionary ispell-personal-dictionary err use-package--warning56 sentence-end-double-space (debug error) require spell-fu nil t display-warning use-package format "Cannot load %s" :error (debug error) "en_GB-ise-w_accents" "~/.aspell.en.pws" set-default spell-fu-word-regexp "\\([[:alpha:]]+\\('[[:alpha:]]+\\)*\\)" spell-fu-faces-exclude (font-latex-math-face font-latex-sedate-face font-lock-keyword-face font-lock-function-name-face font-lock-variable-name-face) :config :catch add-hook mail-mode-hook #[nil "\300\301!\210\302 \210\303\301!\210\304\301!\207" [electric-pair-local-mode 1 turn-on-auto-fill spell-fu-mode company-mode] 2] text-mode-hook #[nil "\300\301!\210\302\301!\210\303 \210\304\301!\210\305\301!\207" [subword-mode 1 electric-pair-local-mode turn-on-auto-fill siege-mode spell-fu-mode] 2]] 5) (defvar use-package--warning57 #[(keyword err) "\303\304\305\306 !$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" dictionary error-message-string display-warning use-package :error] 6]) (byte-code "\3021\3030\207 \304\")\207" [err use-package--warning57 (debug error) nil :catch] 3) (defvar use-package--warning58 #[(keyword err) "\303\304\305\306 !$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" org error-message-string display-warning use-package :error] 6]) (byte-code "\3061\212\307\310\311\"\210\312\302!\203\204\313\314!\203\202\315!\n\203-\n9\203-\nJ\202.\n\2062 ;\203<\202?\316!\n9\203H\n\202I\302B\317\f \"\320 \"\321\247?\205`D\211\203r\241\210\202z\322\323 B\"\210*\324\f \321#-\202\210\307\310\325\"0\207\326\")\207" [#:name #:key org-mode-map global-map #:kmap #:kdesc (debug error) eval-after-load org #[nil "\3041 \305\306\3070\207 \310\n\")\207" [org-use-sub-superscripts org-modules err use-package--warning58 (debug error) {} nil t :config] 3] boundp #1="M-h" vectorp read-kbd-macro key-description lookup-key assoc nil add-to-list personal-keybindings define-key #[nil "\306\307!\203\f\202\310!\n\203\n9\203\nJ\202\n\206# ;\203-\2020\311!\n9\2039\n\202:\302B\312\f \"\313 \"\314\247?\205QD\211\203c\241\210\202k\315\316 B\"\210*\317\f \314#-\207" [#:name #:key org-mode-map global-map #:kmap #:kdesc #1# vectorp read-kbd-macro key-description lookup-key assoc nil add-to-list personal-keybindings define-key #:binding details entry] 5] :catch #:binding details entry err use-package--warning58] 5) (defvar use-package--warning59 #[(keyword err) "\303\304\305\306 !$\307\310\n\311#)\207" [keyword err msg format "%s/%s: %s" deft error-message-string display-warning use-package :error] 6]) (byte-code "\3061l\307\310!\204\311\310\312\313\314$\210\315\310\316\"\210\317\320!\203\"\202%\321!\n;\2031\2024\322!\313B\323 \"\324\f\"\310 \247?\205I D\211\203[\241\210\202c\325\326\fB\"\210*\327 \310#-0\207\330\")\207" [#:name #:key global-map #:kmap #:kdesc #:binding (debug error) fboundp deft autoload "deft" nil t eval-after-load #[nil "\3061\307\310\311\312\313\312\2110\207 \314 \")\207" [deft-default-extension deft-directory deft-use-filename-as-title deft-use-filter-string-for-filename deft-file-naming-rules deft-org-mode-title-prefix (debug error) "org" "~/store/notes" nil t ((noslash . "_") (nospace . "_") (case-fn . downcase)) :config err use-package--warning59] 4] "C-c C-z" vectorp read-kbd-macro key-description lookup-key assoc add-to-list personal-keybindings define-key :catch details entry err use-package--warning59] 6) #@69 Insert a newline above the current line and put point at beginning. (defalias 'vi-open-line-above #[nil "n\204\300 \210\301 \210\302y\210\303 \207" [beginning-of-line newline -1 indent-according-to-mode] 1 (#$ . 4379) nil]) #@69 Insert a newline below the current line and put point at beginning. (defalias 'vi-open-line-below #[nil "l\204\300\210\301 \207" [nil newline-and-indent] 1 (#$ . 4611) nil]) (byte-code "\300\301\302\"\210\300\303\304\"\210\300\305\306\"\210\300\307\310\"\207" [global-set-key [134217839] vi-open-line-below "" vi-open-line-above [201326635] text-scale-increase [201326637] text-scale-decrease] 3)