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



(byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314DD\315\316\317%\207" [custom-declare-group iimage nil "Support for inline images." :version "22.1" :group image custom-declare-variable iimage-mode-image-search-path funcall function #[0 "\300\207" [nil] 1 ""] "List of directories to search for image files for `iimage-mode'." :type (choice (const nil) (repeat directory))] 8)
(defvar iimage-mode-image-filename-regex (byte-code "\301\302\303\304\"\244\305\"P\207" [image-file-name-extensions "[-+./_0-9a-zA-Z]+\\." regexp-opt mapcar upcase t] 5))
(byte-code "\300\301\302\303\304DD\305\306\307%\207" [custom-declare-variable iimage-mode-image-regex-alist funcall function #[0 "\301\302Q\303BC\207" [iimage-mode-image-filename-regex "\\(`?file://\\|\\[\\[\\|<\\|`\\)?\\(" "\\)\\(\\]\\]\\|>\\|'\\)?" 2] 3 ""] "Alist of filename REGEXP vs NUM.\nEach element looks like (REGEXP . NUM).\nNUM specifies which parenthesized expression in the regexp.\n\nExamples of image filename patterns to match:\n    file://foo.png\n    \\=`file://foo.png\\='\n    \\[\\[foo.gif]]\n    <foo.png>\n     foo.JPG" :type (alist :key-type regexp :value-type integer)] 6)
#@31 Keymap used in `iimage-mode'.
(defvar iimage-mode-map (byte-code "\300 \301
\302\303#\210\207" [make-sparse-keymap define-key "\f" iimage-recenter] 5) (#$ . 1254))
#@50 Re-draw images and recenter.

(fn &optional ARG)
(defalias 'iimage-recenter #[256 "\300\301!\210\300\302!\210\303
!\207" [iimage-mode-buffer nil t recenter-top-bottom] 3 (#$ . 1424) "P"])
(byte-code "\300\301\302\303#\210\304\301\302\305#\207" [defalias turn-on-iimage-mode iimage-mode nil make-obsolete "24.1"] 4)
#@39 Unconditionally turn off iimage mode.
(defalias 'turn-off-iimage-mode #[0 "\300\301!\207" [iimage-mode 0] 2 (#$ . 1745) nil])
#@72 Remove display property if a display region is modified.

(fn BEG END)
(defalias 'iimage-modification-hook #[514 "\301\302\303\304\305 $\306\303\304\307 $
\205'\211\205'\310\311!\303\"\205'\312\313#)\207" [inhibit-modification-hooks t previous-single-property-change display nil line-beginning-position next-single-property-change line-end-position plist-get text-properties-at remove-text-properties (display nil modification-hooks nil)] 9 (#$ . 1877)])
#@71 Display images if ARG is non-nil, undisplay them otherwise.

(fn ARG)
(defalias 'iimage-mode-buffer #[257 "	B\306\307 !\310\311 \312\211\312\313\314\"\216\212eb\210
\211\205\202\211@\315
@\310\312#\203{\316
A!\211\262\203 \317\"\211\262\203 \203p\320\321\224\321\225\322\323\310\211\324\3258@Z\326\3278A@Z&\330\331BBBB#\210\202 \332\321\224\321\225\333#\210\202 
A\266\202\202\262
-\207" [default-directory iimage-mode-image-search-path buffer-undo-list inhibit-read-only inhibit-modification-hooks iimage-mode-image-regex-alist window-inside-pixel-edges get-buffer-window nil buffer-modified-p t make-closure #[0 "\300?\205\301\302!\207" [V0 restore-buffer-modified-p nil] 2] re-search-forward match-string locate-file add-text-properties 0 display create-image :max-width 2 :max-height 3 keymap (modification-hooks (iimage-modification-hook)) remove-list-of-text-properties (display modification-hooks) image-map] 21 (#$ . 2348)])
#@91 Non-nil if Iimage mode is enabled.
Use the command `iimage-mode' to change this variable.
(defvar iimage-mode nil (#$ . 3323))
(make-variable-buffer-local 'iimage-mode)
#@598 Toggle Iimage mode on or off.

This is a minor mode.  If called interactively, toggle the `Iimage
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 `iimage-mode'.

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

\{iimage-mode-map}

(fn &optional ARG)
(defalias 'iimage-mode #[256 "\302 
\303=\203
?\202
\247\203
\304W\203\305\202\306\307\301!\2031\310\300	\"\2031\300	B\311!\210\312\313\203?\314\202@\315\"\210\316\317!\203b\302 \203T\211\302 \232\203b\320\321\203^\322\202_\323\324#\210\210\325 \210\207" [iimage-mode local-minor-modes current-message toggle 1 nil t boundp delq iimage-mode-buffer run-hooks iimage-mode-hook iimage-mode-on-hook iimage-mode-off-hook called-interactively-p any message "Iimage mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 6 (#$ . 3499) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar iimage-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\313\310\211%\210\314\315!\207" [iimage-mode-map iimage-mode-hook variable-documentation put "Hook run after entering or leaving `iimage-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 iimage-mode " iImg" provide iimage] 6)