%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/international/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/international/isearch-x.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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\202f\317G\"\211G\320U\203f\312HU\203f\321Y\203f\307)\204\322 \203\323BB\314
\307\302#\203\266G\312V\203\266\307 \250\203\256 \320V\203\256\324\325\326 \"\316#!\327!\211\")\202\262\327\211\")\202\270\330 -\207\331 \"\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 "" substring 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])

Zerion Mini Shell 1.0