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



(byte-code "\300\301!\210\302\303\304\305\306\301%\210\307\310\311\312\313DD\314\315\316%\210\307\317\311\312\320DD\321\315\322%\207" [require iswitchb custom-declare-group isearchb nil "Switch between buffers using a mechanism like isearch." :group custom-declare-variable isearchb-idle-timeout funcall function #[0 "\300\207" [nil] 1 #1=""] "Number of idle seconds before isearchb turns itself off.\nIf nil, don't use a timeout." :type (choice (integer :tag "Seconds") (const :tag "Disable" nil)) isearchb-show-completions #[0 "\300\207" [t] 1 #1#] "If non-nil, show possible completions in the minibuffer." boolean] 6)
(defvar isearchb-start-buffer nil)
(defvar isearchb-last-buffer nil)
(defvar isearchb-idle-timer nil)
#@103 Called by isearchb to terminate a search in progress.

(fn &optional RETURN-TO-BUFFER IGNORE-COMMAND)
(defalias 'isearchb-stop #[512 "\305\306\307\"\210
\203\310!\210\202\n\203\311\n!\210\312\211\203$\313\211\314\312!\207" [isearchb-start-buffer isearchb-last-buffer isearchb-idle-timer this-command last-command remove-hook pre-command-hook isearchb-follow-char switch-to-buffer cancel-timer nil ignore message] 6 (#$ . 809)])
#@129 isearchb's custom version of the `iswitchb' command.
Its purpose is to pass different call arguments to
`iswitchb-read-buffer'.
(defalias 'isearchb-iswitchb #[0 "\303\304\305\306\211\211	\307&\n\310=\203\311\312!\202*\211\205*\313
!\203'\314
!\202*\315
!)\207" [iswitchb-method iswitchb-text iswitchb-exit samewindow iswitchb-read-buffer "iswitch " nil t findfile call-interactively find-file get-buffer iswitchb-visit-buffer iswitchb-possible-new-buffer] 7 (#$ . 1257) nil])
#@62 Switch to buffer matching a substring, based on chars typed.
(defalias 'isearchb #[0 "\306=\204\307	\204\310\311\307!\210\n\203 \312	\313\314\n!!P\315 \210\f@\211\205,\316
!\211\2047\317\312!\210\320 \207\321
!\210
\203G\322\323	\324	!#\207\fG\325U\203S\322\326	\"\207\322\327	\"\207" [last-command iswitchb-text last-command-event iswitchb-rescan iswitchb-matches isearchb-show-completions isearchb nil "" iswitchb-make-buflist t char-to-string event-basic-type iswitchb-set-matches get-buffer isearchb-stop isearchb-iswitchb switch-to-buffer message "isearchb: %s%s" iswitchb-completions 1 "isearchb: %s (only match)" "isearchb: %s"] 7 (#$ . 1747) nil])
#@54 Setup isearchb on the given MODIFIER.

(fn MODIFIER)
(defalias 'isearchb-set-keybindings #[257 "\301\211\302W\205#\303\304!\"\305=\203\306\304D!\307#\210\211T\262
\202
\207" [global-map 0 128 lookup-key vector self-insert-command define-key isearchb] 7 (#$ . 2423)])
#@70 Function added to `post-command-hook' to handle the isearchb "mode".
(defalias 'isearchb-follow-char #[0 "\306\307>\203\310 \211\262\203\211G\311U\204\312 \207\211\313\232\2041\211\314\232\2041\211\315\232\2041\211\316\232\203N	\317	GSO\211G\317U\203G\312\320\211\"\210\202\217\306\321\202\217\211\322\232\204Z\211\323\232\203_\324\202\217\211\325\267\202\204\326 \210\306\321\202\217\327 \210\306\321\202\217\330 \210\312\320\211\"\210\202\217\331\f\"\332=\203\217\321
\205\241?\205\241\333
\306\312#\211\207" [last-command iswitchb-text last-command-event this-command global-map isearchb-idle-timeout nil (isearchb isearchb-activate) this-command-keys 1 isearchb-stop "" "" [backspace] [delete] 0 t isearchb "	" [tab] isearchb-iswitchb #s(hash-table size 3 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("" 101 "" 111 "" 121)) iswitchb-next-match iswitchb-prev-match ding lookup-key self-insert-command run-with-idle-timer isearchb-idle-timer] 6 (#$ . 2705)])
#@209 Active isearchb mode for subsequent alphanumeric keystrokes.
Executing this command again will terminate the search; or, if
the search has not yet begun, will toggle to the last buffer
accessed via isearchb.
(defalias 'isearchb-activate #[0 "\304\267\202\305\306\307\"\207	\203\310	!\210\202\311\312!\210\305\306\307\"\207\313\314!\210\306p\315\316\317\"\207" [last-command isearchb-last-buffer iswitchb-text isearchb-start-buffer #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (isearchb 6 isearchb-activate 11)) isearchb-stop nil t switch-to-buffer error "isearchb: There is no previous buffer to toggle to" message "isearchb: " add-hook pre-command-hook isearchb-follow-char] 3 (#$ . 3740) nil])
(provide 'isearchb)