;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\303\304\305\306\307DD\310\311\312\313\314\315\316\317\320&\207" [require erc flyspell custom-declare-variable erc-spelling-mode funcall function #[0 "\300\207" [nil] 1 ""] "Non-nil if Erc-Spelling mode is enabled.\nSee the `erc-spelling-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `erc-spelling-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group erc-spelling] 12)
#@238 Toggle ERC spelling mode.
With a prefix argument ARG, enable spelling if ARG is positive,
and disable it otherwise.  If called from Lisp, enable the mode
if ARG is omitted or nil.
Enable flyspell mode in ERC buffers.

(fn &optional ARG)
(defalias 'erc-spelling-mode #[256 "\302 \303\301\304=\203\305\301!?\202!\247\203 \306W\203 \307\202!\310\"\210\311\300!\2038\312\301\"\305\301!\2038\301B	\203B\313 \210\202E\314 \210\315\316\305\301!\203Q\317\202R\320\"\210\321\322!\203z\323\301!\210\302 \203j\211\302 \232\203z\324\325\305\301!\203v\326\202w\327\330#\210\210\331 \210\305\301!\207" [global-minor-modes erc-spelling-mode current-message set-default toggle default-value 1 nil t boundp delq erc-spelling-enable erc-spelling-disable run-hooks erc-spelling-mode-hook erc-spelling-mode-on-hook erc-spelling-mode-off-hook called-interactively-p any customize-mark-as-set message "Erc-Spelling mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 679) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar erc-spelling-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\207" [erc-spelling-mode-map erc-spelling-mode-hook variable-documentation put "Hook run after entering or leaving `erc-spelling-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode erc-spelling-mode boundp] 6)
#@27 Enable ERC spelling mode.
(defalias 'erc-spelling-enable #[0 "\301\302\303\"\210\304\305\306\307\"\210\310 \211\205\211@\307
!\210
A\266\202\202\207" [erc-spelling-mode add-to-list erc-modules spelling t add-hook erc-connect-pre-hook erc-spelling-init erc-buffer-list] 4 (#$ . 2275) nil])
#@28 Disable ERC spelling mode.
(defalias 'erc-spelling-disable #[0 "\302\303\"\304\305\306\307\"\210\310 \211\205$\211@r\211q\210\311\312!\210)
A\266\202\202\207" [erc-modules erc-spelling-mode delq spelling nil remove-hook erc-connect-pre-hook erc-spelling-init erc-buffer-list flyspell-mode 0] 4 (#$ . 2575) nil])
(byte-code "\300\301\302\303#\210\300\304\302\303#\210\300\305\302\303#\210\306\307\310\311\312DD\313\314\315\316\317&\207" [put erc-spelling-mode definition-name spelling erc-spelling-enable erc-spelling-disable custom-declare-variable erc-spelling-dictionaries funcall function #[0 "\300\207" [nil] 1 ""] "An alist mapping buffer names to dictionaries.\nThe `car' of every cell is a buffer name, the `cadr' is the\nstring name of an associated dictionary.\nThe dictionary is inherited from server buffers, so if you want a\ndefault dictionary for some server, you can use a server buffer\nname here." :type (choice (const nil) (repeat (cons (string :tag "Buffer name") (string :tag "Dictionary")))) :group erc-spelling] 8)
#@92 Enable flyspell mode in an ERC buffer.
The current buffer is given by BUFFER.

(fn BUFFER)
(defalias 'erc-spelling-init #[257 "r\211q\210\303 \227\211\203<\211\203 

@@\227\230\204 \211A\262
\202\f\211\203+\211@A@\202;\304 \305
!\2059r\211q\210	)\262
\266\306\307\310!)\207" [erc-spelling-dictionaries ispell-local-dictionary flyspell-generic-check-word-predicate buffer-name erc-server-buffer buffer-live-p erc-spelling-flyspell-verify flyspell-mode 1] 6 (#$ . 3625)])
#@92 Unhighlight the given WORD.
The cadr is the beginning and the caddr is the end.

(fn WORD)
(defalias 'erc-spelling-unhighlight-word #[257 "\211A@\3008\301!\210\211V\205\301
S!\207" [2 flyspell-unhighlight-at] 5 (#$ . 4112)])
#@45 Flyspell only the input line, nothing else.
(defalias 'erc-spelling-flyspell-verify #[0 "\303\300!\205\211\205<`	W\203\304\207\n\203'\305\306@!\n\"\203'\307
!\210\304\207\211A@\206.`Sf\310=\203;\307
!\210\304\207\311\207" [flyspell-word erc-input-marker erc-channel-users boundp nil gethash erc-downcase erc-spelling-unhighlight-word 47 t] 4 (#$ . 4348)])
(byte-code "\300\301\302\303#\210\304\305!\207" [put erc-mode flyspell-mode-predicate erc-spelling-flyspell-verify provide erc-spelling] 4)