;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. #@37 The item used in `auto-mode-alist'. (defconst pdf-loader--auto-mode-alist-item (copy-sequence "\\.[pP][dD][fF]\\'") (#$ . 87)) #@37 The item used in`magic-mode-alist'. (defconst pdf-loader--magic-mode-alist-item (copy-sequence "%PDF") (#$ . 220)) #@334 Prepare Emacs for using PDF Tools. This function acts as a replacement for `pdf-tools-install' and makes Emacs load and use PDF Tools as soon as a PDF file is opened, but not sooner. The arguments are passed verbatim to `pdf-tools-install', which see. (fn &optional NO-QUERY-P SKIP-DEPENDENCIES-P NO-ERROR-P FORCE-DEPENDENCIES-P) (defalias 'pdf-loader-install #[1024 "F\300\301!\203\302\303\"\207\304\305\306\"!\207" [featurep pdf-tools apply pdf-tools-install pdf-loader--install make-closure #[0 "\301\302\300\"\207" [V0 apply pdf-loader--load] 3]] 9 (#$ . 342)]) #@19 (fn &rest ARGS) (defalias 'pdf-loader--load #[128 "\300 \210\301 r\302\303\"\216\304!*\207" [pdf-loader--uninstall internal--before-save-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-save-selected-window] 2] pdf-tools-install] 5 (#$ . 925)]) #@15 (fn LOADER) (defalias 'pdf-loader--install #[257 "\304 \210B B\nB B\211\207" [pdf-loader--auto-mode-alist-item auto-mode-alist pdf-loader--magic-mode-alist-item magic-mode-alist pdf-loader--uninstall] 3 (#$ . 1200)]) (defalias 'pdf-loader--uninstall #[0 "\304 \"\211\203 \305 \"\210\304\n \"\211\205\305 \"\211\207" [pdf-loader--auto-mode-alist-item auto-mode-alist pdf-loader--magic-mode-alist-item magic-mode-alist assoc remove] 4]) (provide 'pdf-loader)