;ELC   
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\210\300\307!\210\310\311\312\313\314\315%\210\316\317\320\321\314\311\314\322&\210\316\323\324\325\314\311\314\322&\210\316\326\327\330\314\311\314\322&\210\331\332\333\334\335DD\336\314\311\337\340&\207" [require cl-lib pdf-util pdf-info pdf-misc pdf-view pdf-cache let-alist custom-declare-group pdf-isearch nil "Isearch in pdf buffers." :group pdf-tools custom-declare-face pdf-isearch-match ((((background dark)) (:inherit isearch)) (((background light)) (:inherit isearch))) "Face used to determine the colors of the current match." pdf-tools-faces pdf-isearch-lazy ((((background dark)) (:inherit lazy-highlight)) (((background light)) (:inherit lazy-highlight))) "Face used to determine the colors of non-current matches." pdf-isearch-batch ((((background dark)) (:inherit match)) (((background light)) (:inherit match))) "Face used to determine the colors in `pdf-isearch-batch-mode'." custom-declare-variable pdf-isearch-hyphenation-character funcall function #[0 "\300\207" [#1="-­"] 1 #1#] "Characters used as hyphens when word searching." :type string] 8)
#@207 Search function used when searching.

Like `isearch-search-fun-function', though it should return a
function (FN STRING &optional PAGES), which in turn should
return a result like `pdf-info-search-regexp'.
(defvar pdf-isearch-search-fun-function nil (#$ . 1248))
#@38 The page that is currently searched.
(defvar pdf-isearch-current-page nil (#$ . 1517))
(make-variable-buffer-local 'pdf-isearch-current-page)
#@164 A list ((LEFT TOP RIGHT BOT) ...) of the current match or nil.

A match may contain more than one edges-element, e.g. when regexp
searching across multiple lines.
(defvar pdf-isearch-current-match nil (#$ . 1666))
(make-variable-buffer-local 'pdf-isearch-current-match)
#@39 A list of matches of the last search.
(defvar pdf-isearch-current-matches nil (#$ . 1942))
(make-variable-buffer-local 'pdf-isearch-current-matches)
#@75 A list of search parameter (search-string regex-p case-fold word-search).
(defvar pdf-isearch-current-parameter nil (#$ . 2097))
(make-variable-buffer-local 'pdf-isearch-current-parameter)
#@42 Keymap used in `pdf-isearch-minor-mode'.
(defvar pdf-isearch-minor-mode-map (byte-code "\300 \301\302\303#\210\207" [make-sparse-keymap define-key [remap occur] pdf-occur] 5) (#$ . 2292))
#@139 Keymap used in `pdf-isearch-active-mode'.

This keymap is used, when isearching in PDF buffers.  Its parent
keymap is `isearch-mode-map'.
(defvar pdf-isearch-active-mode-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\207" [isearch-mode-map make-sparse-keymap set-keymap-parent define-key "" pdf-view-dark-minor-mode "" pdf-isearch-batch-mode [134217843 111] pdf-isearch-occur [134217843 115] pdf-isearch-sync-backward] 5) (#$ . 2488))
(byte-code "\300\301\302\303#\210\300\304\302\303#\207" [put image-scroll-up isearch-scroll t image-scroll-down] 4)
#@115 Non-nil if Pdf-Isearch-Active mode is enabled.
Use the command `pdf-isearch-active-mode' to change this variable.
(defvar pdf-isearch-active-mode nil (#$ . 3107))
(make-variable-buffer-local 'pdf-isearch-active-mode)
#@22 

(fn &optional ARG)
(defalias 'pdf-isearch-active-mode #[256 "\305 \306=\203 ?\202 \247\203 \307W\203 \310\202 \311\312\301!\2031 \313\300	\"\2031 \300	B\203@ \314\303!\210\n\211\202D \315\303!\210\316\317\203N \320\202O \321\"\210\322\323!\203q \305 \203c \211\305 \232\203q \324\325\203m \326\202n \327\330#\210\210\331 \210\207" [pdf-isearch-active-mode local-minor-modes pdf-isearch-active-mode-map isearch-mode-map overriding-terminal-local-map current-message toggle 1 nil t boundp delq make-local-variable kill-local-variable run-hooks pdf-isearch-active-mode-hook pdf-isearch-active-mode-on-hook pdf-isearch-active-mode-off-hook called-interactively-p any message "Pdf-Isearch-Active mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 3330) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar pdf-isearch-active-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" [pdf-isearch-active-mode-map pdf-isearch-active-mode-hook variable-documentation put "Hook run after entering or leaving `pdf-isearch-active-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 pdf-isearch-active-mode boundp] 6)
#@113 Non-nil if Pdf-Isearch minor mode is enabled.
Use the command `pdf-isearch-minor-mode' to change this variable.
(defvar pdf-isearch-minor-mode nil (#$ . 4771))
(make-variable-buffer-local 'pdf-isearch-minor-mode)
#@1779 Isearch mode for PDF buffer.

This is a minor mode.  If called interactively, toggle the
`Pdf-Isearch minor mode' mode.  If the prefix argument is
positive, enable the mode, and if it is zero or negative, disable
the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `pdf-isearch-minor-mode'.

The mode's hook is called both when the mode is enabled and when
it is disabled.

When this mode is enabled \[isearch-forward], among other keys,
starts an incremental search in this PDF document.  Since this mode
uses external programs to highlight found matches via
image-processing, proceeding to the next match may be slow.

Therefore two isearch behaviours have been defined: Normal isearch and
batch mode.  The later one is a minor mode
(`pdf-isearch-batch-mode'), which when activated inhibits isearch
from stopping at and highlighting every single match, but rather
display them batch-wise.  Here a batch means a number of matches
currently visible in the selected window.

The kind of highlighting is determined by three faces
`pdf-isearch-match' (for the current match), `pdf-isearch-lazy'
(for all other matches) and `pdf-isearch-batch' (when in batch
mode), which see.

Colors may also be influenced by the minor-mode
`pdf-view-dark-minor-mode'.  If this is minor mode enabled, each face's
dark colors, are used (see e.g. `frame-background-mode'), instead
of the light ones.

\{pdf-isearch-minor-mode-map}
While in `isearch-mode' the following keys are available. Note
that not every isearch command work as expected.

\{pdf-isearch-active-mode-map}

(fn &optional ARG)
(defalias 'pdf-isearch-minor-mode #[256 "\306 \307=\203 ?\202 \247\203 \310W\203 \311\202 \312\313\301!\2031 \314\300	\"\2031 \300	B\315 \210\203\226 \313\302!\203D \316\302!\210\311\316\303!\210\317\316\304!\210\320\316\305!\210\321\316\322!\210\311\316\323!\210\312\316\324!\210??\313\325!\203~ \326U\203~ \310\327\330\331\311\312$\210\327\332\333\311\312$\210\327\334\335\311\312$\210\202\312 \313\302!\203\240 \336\302!\210\336\324!\210\336\323!\210\336\303!\210\336\304!\210\336\305!\210\336\322!\210\337\334\335\312#\210\337\330\331\312#\210\337\332\333\312#\210\340\341\203\324 \342\202\325 \343\"\210\344\345!\203\367 \306 \203\351 \211\306 \232\203\367 \346\347\203\363 \350\202\364 \351\352#\210\210\353 \210\207" [pdf-isearch-minor-mode local-minor-modes character-fold-search isearch-search-fun-function isearch-push-state-function isearch-wrap-function current-message toggle 1 nil t boundp delq pdf-util-assert-pdf-buffer make-local-variable #[0 "\300\207" [pdf-isearch-search-function] 1] pdf-isearch-push-state-function pdf-isearch-wrap-function isearch-lazy-highlight isearch-allow-scroll search-exit-option imagemagick-render-type 0 add-hook isearch-mode-hook pdf-isearch-mode-initialize isearch-mode-end-hook pdf-isearch-mode-cleanup isearch-update-post-hook pdf-isearch-update kill-local-variable remove-hook run-hooks pdf-isearch-minor-mode-hook pdf-isearch-minor-mode-on-hook pdf-isearch-minor-mode-off-hook called-interactively-p any message "Pdf-Isearch minor mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 4992) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar pdf-isearch-minor-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" [pdf-isearch-minor-mode-map pdf-isearch-minor-mode-hook variable-documentation put "Hook run after entering or leaving `pdf-isearch-minor-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 pdf-isearch-minor-mode boundp] 6)
#@113 Non-nil if Pdf-Isearch-Batch mode is enabled.
Use the command `pdf-isearch-batch-mode' to change this variable.
(defvar pdf-isearch-batch-mode nil (#$ . 9011))
(make-variable-buffer-local 'pdf-isearch-batch-mode)
#@834 Isearch PDF documents batch-wise.

This is a minor mode.  If called interactively, toggle the
`Pdf-Isearch-Batch mode' mode.  If the prefix argument is
positive, enable the mode, and if it is zero or negative, disable
the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `pdf-isearch-batch-mode'.

The mode's hook is called both when the mode is enabled and when
it is disabled.

If this mode is enabled, isearching does not stop at every match,
but rather moves to the next one not currently visible.  This
behaviour is much faster than ordinary isearch, since far less
different images have to be displayed.

(fn &optional ARG)
(defalias 'pdf-isearch-batch-mode #[256 "\303 \304=\203 ?\202 \247\203 \305W\203 \306\202 \307\310\301!\2031 \311\300	\"\2031 \300	B\n\203D \312 \210\313\203A \314\202B \315!\210\316\317\203N \320\202O \321\"\210\322\323!\203q \303 \203c \211\303 \232\203q \324\325\203m \326\202n \327\330#\210\210\331 \210\207" [pdf-isearch-batch-mode local-minor-modes isearch-mode current-message toggle 1 nil t boundp delq pdf-isearch-redisplay pdf-isearch-message "batch mode" "isearch mode" run-hooks pdf-isearch-batch-mode-hook pdf-isearch-batch-mode-on-hook pdf-isearch-batch-mode-off-hook called-interactively-p any message "Pdf-Isearch-Batch mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 6 (#$ . 9231) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar pdf-isearch-batch-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" [pdf-isearch-batch-mode-map pdf-isearch-batch-mode-hook variable-documentation put "Hook run after entering or leaving `pdf-isearch-batch-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 pdf-isearch-batch-mode boundp] 6)
#@204 A function for filtering isearch matches.

The function receives one argument: a list of matches, each
being a list of edges. It should return a subset of this list.
Edge coordinates are in image-space.
(defvar pdf-isearch-filter-matches-function nil (#$ . 11441))
#@63 Non-nil, if the search should be limited to the current page.
(defvar pdf-isearch-narrow-to-page nil (#$ . 11712))
#@106 Search for STRING in the current PDF buffer.

This is a Isearch interface function.

(fn STRING &rest _)
(defalias 'pdf-isearch-search-function #[385 "G\306V\205\221 \307 \310!\311	\204 \312!\262\n\203  \n!\262\313\314\311\"\315\f	&\262F\211\203n \211\316\"\210\317!\210o\203S 	\203[ m\203b 	\203b \320 \321\245Tb\210	\203j \322\323!\207\324\323!\207?\205\217 \325!?\205\217 \326\327#\211\205\215 \330!\210\331!\262\266\204\207" [pdf-isearch-current-page isearch-forward pdf-isearch-filter-matches-function pdf-isearch-current-matches pdf-isearch-current-match isearch-regexp 0 pdf-isearch-same-search-p pdf-isearch-search-page nil reverse image-mode-window-get page pdf-isearch-next-match pdf-isearch-hl-matches pdf-isearch-focus-match buffer-size 2 re-search-forward "." re-search-backward pdf-isearch-empty-match-p pdf-isearch-find-next-matching-page t pdf-view-goto-page pdf-isearch-search-function isearch-case-fold-search isearch-word pdf-isearch-current-parameter pdf-isearch-narrow-to-page] 13 (#$ . 11834)])
#@71 Push the current search state.

This is a Isearch interface function.
(defalias 'pdf-isearch-push-state-function #[0 "\304 \305 	\n\306\307&\207" [pdf-isearch-current-parameter pdf-isearch-current-matches pdf-isearch-current-match pdf-isearch-current-page window-hscroll window-vscroll make-closure #[257 "\302\n\303\304\f\305\306!\210\f\203 \307\f\"\210\310\300!\210\311\301!\207" [V0 V1 V2 V3 V4 V5 pdf-view-goto-page pdf-isearch-hl-matches image-set-window-hscroll image-set-window-vscroll pdf-isearch-current-parameter pdf-isearch-current-matches pdf-isearch-current-match pdf-isearch-current-page] 4 "\n\n(fn STATE)"]] 14 (#$ . 12897)])
#@66 Go to first or last page.

This is a Isearch interface function.
(defalias 'pdf-isearch-wrap-function #[0 "\203 \304\202\n \305 	\204- \211\306\307\310\"U\204- \311!\210\312\211\304U\203) \313 \210\202, \314 \210)\210\310\211\207" [isearch-forward pdf-isearch-narrow-to-page next-screen-context-lines pdf-isearch-current-match 1 pdf-cache-number-of-pages image-mode-window-get page nil pdf-view-goto-page 0 image-scroll-down image-scroll-up] 5 (#$ . 13573)])
#@71 Cleanup after exiting Isearch.

This is a Isearch interface function.
(defalias 'pdf-isearch-mode-cleanup #[0 "\300\301!\210\302 \207" [pdf-isearch-active-mode -1 pdf-view-redisplay] 2 (#$ . 14043)])
#@63 Initialize isearching.

This is a Isearch interface function.
(defalias 'pdf-isearch-mode-initialize #[0 "\304\305!\210\306\307\310\"\310\211\310\311 \312\245Tb\207" [pdf-isearch-current-page pdf-isearch-current-match pdf-isearch-current-matches pdf-isearch-current-parameter pdf-isearch-active-mode 1 image-mode-window-get page nil buffer-size 2] 4 (#$ . 14249)])
#@264 Return non-nil, if search parameter have not changed.

Parameter inspected are `isearch-string' (unless
IGNORE-SEARCH-STRING-P is t) and `isearch-case-fold-search'.  If
there was no previous search, this function returns t.

(fn &optional IGNORE-SEARCH-STRING-P)
(defalias 'pdf-isearch-same-search-p #[256 "?\206 	\n\fF\203 AA\232\202 \232\262\207" [pdf-isearch-current-parameter isearch-string isearch-regexp isearch-case-fold-search isearch-word] 5 (#$ . 14625)])
#@98 Determine the next match.

(fn LAST-PAGE THIS-PAGE LAST-MATCH ALL-MATCHES CONTINUED-P FORWARD-P)
(defalias 'pdf-isearch-next-match #[1542 "\203 \301\202	 \302&\207" [pdf-isearch-batch-mode pdf-isearch-next-match-batch pdf-isearch-next-match-isearch] 13 (#$ . 15108)])
#@67 Make the CURRENT-MATCH visible in the window.

(fn CURRENT-MATCH)
(defalias 'pdf-isearch-focus-match #[257 "\203 \301\202	 \302!\207" [pdf-isearch-batch-mode pdf-isearch-focus-match-batch pdf-isearch-focus-match-isearch] 3 (#$ . 15397)])
#@37 Redisplay the current highlighting.
(defalias 'pdf-isearch-redisplay #[0 "\302	\"\207" [pdf-isearch-current-match pdf-isearch-current-matches pdf-isearch-hl-matches] 3 (#$ . 15644)])
#@44 Update search and redisplay, if necessary.
(defalias 'pdf-isearch-update #[0 "\306\307!?\205 	\nF\310!\311 \207" [isearch-string isearch-regexp isearch-case-fold-search isearch-word pdf-isearch-current-parameter pdf-isearch-current-matches pdf-isearch-same-search-p t pdf-isearch-search-page pdf-isearch-redisplay] 4 (#$ . 15834)])
#@60 Like `message', but Isearch friendly.

(fn FMT &rest ARGS)
(defalias 'pdf-isearch-message #[385 "\211\204 C\262\301\262\302\303#\304\305\306\307\310 \"\"\203( \303\311\"\312 \210\313\314!)\207\315\301\"\207" [isearch-message-suffix-add "%s" apply format cl-some #[257 "\300\301\"\207" [buffer-local-value isearch-mode] 4 "\n\n(fn BUF)"] mapcar window-buffer window-list " [%s]" isearch-message sit-for 1 message] 8 (#$ . 16178)])
#@16 

(fn MATCHES)
(defalias 'pdf-isearch-empty-match-p #[257 "\211\205 \300\301\"\207" [cl-every #[257 "\300\301\"\207" [cl-every #[257 "\300\301\"\207" [cl-every zerop] 4 "\n\n(fn EDGES)"]] 4 "\n\n(fn MATCH)"]] 4 (#$ . 16624)])
#@53 Run `occur' using the last search string or regexp.
(defalias 'pdf-isearch-occur #[0 "\306	!\203 	\n!\202 	\203 \307\n\310#\202 \f\205 \n\311 r\312\313\"\216\314\206. \n\"\210*\210\315 )\207" [isearch-case-fold-search isearch-word isearch-string pdf-isearch-hyphenation-character isearch-regexp case-fold-search functionp pdf-isearch-word-search-regexp nil internal--before-save-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-save-selected-window] 2] pdf-occur isearch-message] 6 (#$ . 16860) nil])
#@57 Visit the source of the beginning of the current match.
(defalias 'pdf-isearch-sync-backward #[0 "\302 \210\204 \303\304!\210	\203 \305 \210@\211G\306U\203$ \211A\262\242\202+ \307\310\311GD\"\211A\262\242\312\211A\262\210\312\313\"\207" [pdf-isearch-current-match isearch-mode pdf-util-assert-pdf-window user-error "No current or recent match" isearch-exit 4 signal wrong-number-of-arguments (left top _right _bot) nil pdf-sync-backward-search] 8 (#$ . 17399) nil])
#@185 Search STRING on PAGE in the current window.

Returns a list of edges (LEFT TOP RIGHT BOTTOM) in PDF
coordinates, sorted top to bottom, then left to right.

(fn STRING &optional PAGE)
(defalias 'pdf-isearch-search-page #[513 "\211\204\n \302\303\304\"\262\305\306\307 \")\"\207" [isearch-case-fold-search case-fold-search image-mode-window-get page nil mapcar #[257 "\211\300\236A\301\302\"\207" [edges pdf-util-scale-relative-to-pixel round] 6 "\n\n(fn MATCH)"] pdf-isearch-search-fun] 7 (#$ . 17886)])
(defalias 'pdf-isearch-search-fun #[0 "\206 \301 \207" [pdf-isearch-search-fun-function pdf-isearch-search-fun-default] 1])
#@49 Return default functions to use for the search.
(defalias 'pdf-isearch-search-fun-default #[0 "\302=\203 \303\207	\203 \304\207\305\207" [isearch-word isearch-regexp t #[513 "\206# 	@?\206# \nG\305	@!>\204 \306\307\310	@D\"\210	@\311HG=?\312\313\f#\314#\207" [isearch-nonincremental isearch-cmds isearch-string cl-struct-isearch--state-tags pdf-isearch-hyphenation-character type-of signal wrong-type-argument isearch--state 1 pdf-info-search-regexp pdf-isearch-word-search-regexp invalid-regexp] 8 "\n\n(fn STRING &optional PAGES)"] #[513 "\300\301#\207" [pdf-info-search-regexp invalid-regexp] 6 "\n\n(fn STRING &optional PAGES)"] pdf-info-search-string] 2 (#$ . 18529)])
#@105 Return a PCRE which matches words, ignoring punctuation.

(fn STRING &optional LAX HYPHENIZATION-CHARS)
(defalias 'pdf-isearch-word-search-regexp #[769 "\211\205 \301\302\303\304\305\306$\"\307\232\203 \307\207\310\311\306\312#)\266\203\203' \313\207\314\311\306\312#)\266\203\203; \313\202A ?\205A \315\316\317\320\"\321\313\306#\313#\322\311\306\312#)\266\203\203c \313\202i ?\205i \315Q\207" [inhibit-changing-match-data format "(?:[%s]\\n)?" replace-regexp-in-string "[]^\\\\-]" "\\\\\\&" t "" "\\`\\W+\\'" nil string-match "\\W+" "\\`\\W" "\\b" mapconcat make-closure #[257 "\300\203 \301\302\303\304\"\300#\207\305!\207" [V0 mapconcat #[257 "\300\301!!\207" [pdf-util-pcre-quote string] 4 "\n\n(fn CH)"] append nil pdf-util-pcre-quote] 6 "\n\n(fn WORD)"] split-string "\\W\\'"] 13 (#$ . 19221)])
#@246 Find STRING after or before page PAGE, according to FORWARD-P.

If INTERACTIVE-P is non-nil, give some progress feedback.
Returns the page number where STRING was found, or nil if there
is no such page.

(fn STRING PAGE &optional INTERACTIVE-P)
(defalias 'pdf-isearch-find-next-matching-page #[770 "\303\203 TTB\202 SSB\304 \305\211\204\320 \203& @\306 X\2041 \204\320 A\303Y\203\320 	\"\307\310\203C @\202G \311!@\"\262)\210\312_\262\203i \211AT\240\210\306 A\\^\241\210\202y \211@S\241\210\303@Z]\240\210\203 \211\204\243 \313U\203\243 \314\315\316\203\231 @\306 \305\317F\202\240 \303A\305\317F#\262\211\203 \211\203\264 AZ\202\271 @Z\305\247\203\306 @Y\205\313 \320#\266\202 \207" [isearch-forward isearch-case-fold-search case-fold-search 1 pdf-isearch-search-fun nil pdf-cache-number-of-pages alist-get page last 2 8 apply make-progress-reporter "Searching" 0 progress-reporter-do-update] 15 (#$ . 20059)])
#@183 Default function for choosing the next match.

Implements default isearch behaviour, i.e. it stops at every
match.

(fn LAST-PAGE THIS-PAGE LAST-MATCH MATCHES SAME-SEARCH-P FORWARD)
(defalias 'pdf-isearch-next-match-isearch #[1542 "\204- \300 \203 \211@A@@A@F\202% \3018\3028\3018\3028F\303C#\207=\2046 @\207\203D \205M \235A@\207\205M \303#\207" [pdf-util-image-displayed-edges 2 3 pdf-isearch-closest-match] 12 (#$ . 21039)])
#@74 Make the image area in MATCH visible in the selected window.

(fn MATCH)
(defalias 'pdf-isearch-focus-match-isearch #[257 "\300\301\302\"!\207" [pdf-util-scroll-to-edges apply pdf-util-edges-union] 5 (#$ . 21498)])
#@133 Select the next match, unseen in the current search direction.

(fn LAST-PAGE THIS-PAGE LAST-MATCH MATCHES SAME-SEARCH-P FORWARD-P)
(defalias 'pdf-isearch-next-match-batch #[1542 "\203 \203 =\204 \300&\207\301 \302\303\304\"\235A\"@\207" [pdf-isearch-next-match-isearch pdf-util-image-displayed-edges cl-remove-if make-closure #[257 "\301\302\"\3038\303\3008X\205' \3048\304\3008X\205' \211@\300@Y\205' \211A@\300A@Y\207" [V0 apply pdf-util-edges-union 2 3] 5 "\n\n(fn EDGES)"]] 13 (#$ . 21721)])
#@82 Make the image area in MATCH eagerly visible in the selected window.

(fn MATCH)
(defalias 'pdf-isearch-focus-match-batch #[257 "\300\301\302\"\303\"\207" [pdf-util-scroll-to-edges apply pdf-util-edges-union t] 5 (#$ . 22252)])
(byte-code "\300\301\302\303#\210\300\304\302\305#\207" [put pdf-isearch-match cl-deftype-handler #[0 "\300\207" [(satisfies (lambda (match) (cl-every (lambda (edges) (and (consp edges) (= (length edges) 4) (cl-every 'numberp edges))) match)))] 1] list-of #[257 "\300\301\302\303\304\305\301\306\307\310\311DEE\312BBEED\207" [satisfies lambda (l) and (listp l) cl-every (x) cl-typep x quote (l)] 13 "\n\n(fn TYPE)"]] 4)
#@268 Find the nearest element to MATCH in MATCHES.

The direction in which to look is determined by FORWARD-P.

MATCH should be a list of edges, MATCHES a list of such element;
it is assumed to be ordered with respect to FORWARD-P.

(fn MATCH MATCHES &optional FORWARD-P)
(defalias 'pdf-isearch-closest-match #[770 "\300\301\"\262\204 \302\303\304\305E\"\210\211<\205 \300\306\"\262\204) \302\303\307\310E\"\210\311\312\"\3132\243 \314:\203\237 @\262\311\312\"\203l \211A@\3158Y\204\222 \211A@A@Y\204b \3158\3158Y\203\227 \3168\3168Y\202\217 \3158A@X\204\222 \3158\3158X\204\212 \211A@A@X\203\227 \211@@X\203\227 \317\313\"\210\210A\262\2023 \266\3140\207" [cl-every #[257 "\211:\205 \211G\300U\205 \301\302\"\207" [4 cl-every numberp] 4 "\n\n(fn EDGES)"] signal wrong-type-argument pdf-isearch-match match #[257 "\211\300\301\"\207" [cl-every #[257 "\211:\205 \211G\300U\205 \301\302\"\207" [4 cl-every numberp] 4 "\n\n(fn EDGES)"]] 5 "\n\n(fn X)"] (list-of pdf-isearch-match) matches apply pdf-util-edges-union --cl-block-nil-- nil 3 2 throw] 10 (#$ . 22910)])
#@183 Return the current color set.

The return value depends on `pdf-view-dark-minor-mode' and
`pdf-isearch-batch-mode'.  It is a list of four colors (MATCH-FG
MATCH-BG LAZY-FG LAZY-BG).
(defalias 'pdf-isearch-current-colors #[0 "	\203 \302\303\"\211@A@AF\207\302\304\"\302\305\"@A@AF\207" [pdf-view-dark-minor-mode pdf-isearch-batch-mode pdf-util-face-colors pdf-isearch-batch pdf-isearch-match pdf-isearch-lazy] 7 (#$ . 24015)])
(defvar pdf-isearch--hl-matches-tick 0)
#@86 Highlighting edges CURRENT and MATCHES.

(fn CURRENT MATCHES &optional OCCUR-HACK-P)
(defalias 'pdf-isearch-hl-matches #[770 "\302\303\"\262\204 \304\305\306\307E\"\210\211<\205 \302\310\"\262\204) \304\305\311\312E\"\210\313 \211G\314U\203; \211A\262\242\202B \304\315\316GD\"\211A\262\242\211A\262\242\242\317 @\320\321\322\"\323 pT\211\324\325\f&\326\327\322\330!BB\f\f\330\331\332\333\"\"!BB&)\207" [pdf-isearch--hl-matches-tick pdf-info-asynchronous cl-every #[257 "\211:\205 \211G\300U\205 \301\302\"\207" [4 cl-every numberp] 4 "\n\n(fn EDGES)"] signal wrong-type-argument pdf-isearch-match current #[257 "\211\300\301\"\207" [cl-every #[257 "\211:\205 \211G\300U\205 \301\302\"\207" [4 cl-every numberp] 4 "\n\n(fn EDGES)"]] 5 "\n\n(fn X)"] (list-of pdf-isearch-match) matches pdf-isearch-current-colors 4 wrong-number-of-arguments (fg1 bg1 fg2 bg2) pdf-view-image-size image-mode-window-get page nil selected-window make-closure #[514 "?\205X \304=\205X \306\303!\205X \307\302!\205X \310\302!\303=\205X \311\302!r\312\313\"\216\314@\315\"\210\316\317!\205U \204= \300\205U \301\320\321\322\"=\205U \323\324\325 \326\327\206S \330%!*\262\207" [V0 V1 V2 V3 V4 pdf-isearch--hl-matches-tick buffer-live-p window-live-p window-buffer internal--before-with-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord derived-mode-p pdf-view-mode image-mode-window-get page nil pdf-view-display-image create-image pdf-view-image-type t :relief 0 isearch-mode pdf-view-image-relief] 10 "\n\n(fn STATUS DATA)"] pdf-info-renderpage-text-regions t pdf-util-scale-pixel-to-relative apply append remove] 27 (#$ . 24499)])
(provide 'pdf-isearch)