HOME

;ELC
;;; Compiled
;;; in Emacs version 26.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@62 Select an input method and turn it on in interactive search.
(defalias 'isearch-toggle-specified-input-method #[nil "\304\305\306!\210)	\306\304\307 \207" [overriding-terminal-local-map input-method-function isearch-input-method-function isearch-input-method-local-p nil toggle-input-method t isearch-update] 2 (#$ . 408) nil])
#@44 Toggle input method in interactive search.
(defalias 'isearch-toggle-input-method #[nil "\304\305 \210)	\306\304\307 \207" [overriding-terminal-local-map input-method-function isearch-input-method-function isearch-input-method-local-p nil toggle-input-method t isearch-update] 1 (#$ . 746) nil])
#@75 Keymap to use in minibuffer for multibyte character inputting in isearch.
(defvar isearch-minibuffer-local-map (byte-code "\302!\303	\304\305#\210\303	\306\307#\210	)\207" [minibuffer-local-map map copy-keymap define-key [with-keyboard-coding] isearch-with-keyboard-coding [with-input-method] isearch-with-input-method] 4) (#$ . 1052))
(defalias 'isearch-exit-recursive-edit #[(start end length) "\300\301\302\"\207" [throw exit nil] 3 nil nil])
(defalias 'isearch-with-keyboard-coding #[nil "\301\302 \210)\303 \207" [after-change-functions (isearch-exit-recursive-edit) recursive-edit exit-minibuffer] 1 nil nil])
(defalias 'isearch-with-input-method #[nil "@\304A\n!\211\203!	@\250\203	@c\210	A\211\204\305 *\207" [unread-command-events events key input-method-function nil exit-minibuffer] 3 nil nil])
(defalias 'isearch-process-search-multibyte-characters #[(last-char &optional count) "\306=\203\272\307\310 	\307\211\311\312
G\307
$\210\203g\307\313BB\314
\302\307\315%\211\203AGGW\203F\316\202fG\307O\211G\317U\203f\312HU\203f\320Y\203f\307)\204\321 \203\322BB\314
\307\302#\203\266G\312V\203\266\307\250\203\256\317V\203\256\323\324\325\"\316# \326 \211\")\202\262\326\211\")\202\270\327 -\207\330\"\207" [this-command isearch-minibuffer-local-map junk-hist str minibuffer-local-map prompt isearch-printing-char nil isearch-message-prefix set-text-properties 0 with-input-method read-string t "" 1 128 keyboard-coding-system with-keyboard-coding mapconcat identity make-list isearch-process-search-string isearch-update isearch-process-search-char overriding-terminal-local-map isearch-input-method-function input-method-verbose-flag last-char unread-command-events isearch-message count strs] 7])