;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (defconst visual-fill--space " ") #@18 (fn START END) (defalias 'visual-fill--cleanup #[514 "W\205'\301\302$\211\262\205'\303\304\302$\206\211\262\305#\210\202\207" [visual-fill--space text-property-any display remove-text-properties text-property-not-all (display nil)] 9 (#$ . 121)]) #@18 (fn START END) (defalias 'visual-fill--jit #[514 "\305\"\210b\210\306y\210\307!`W\205P\310y\210\211\203#\307!\262\202\307!\211\262\204\307 !\204\311`S\307\n\203> \202?\312!\203H\306\225\202I`\313\f$\210\202\207" [paragraph-separate paragraph-start adaptive-fill-mode adaptive-fill-regexp visual-fill--space visual-fill--cleanup 0 looking-at 1 put-text-property "[ ]+" display] 8 (#$ . 394)]) #@101 Non-nil if Visual-Fill mode is enabled. Use the command `visual-fill-mode' to change this variable. (defvar visual-fill-mode nil (#$ . 819)) (make-variable-buffer-local 'visual-fill-mode) #@610 Auto-refill paragraphs without modifying the buffer. This is a minor mode. If called interactively, toggle the `Visual-Fill 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 `visual-fill-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (defalias 'visual-fill-mode #[256 "\305 \306=\203 ?\202\247\203\307W\203\310\202\311\312\301!\2031\313\300 \"\2031\300 B\314\315!\210\316 \311\211\311\317\320\"\216\321ed\"\210,\210\203Q\322\315!\210\323\324\203[\325\202\\\326\"\210\327\330!\203~\305 \203p\211\305 \232\203~\331\332\203z\333\202{\334\335#\210\210\336 \210\207" [visual-fill-mode local-minor-modes buffer-undo-list inhibit-read-only inhibit-modification-hooks current-message toggle 1 nil t boundp delq jit-lock-unregister visual-fill--jit buffer-modified-p make-closure #[0 "\300?\205\301\302!\207" [V0 restore-buffer-modified-p nil] 2] visual-fill--cleanup jit-lock-register run-hooks visual-fill-mode-hook visual-fill-mode-on-hook visual-fill-mode-off-hook called-interactively-p any message "Visual-Fill mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 1014) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar visual-fill-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\314\300!\205#\310\211%\210\315\316!\207" [visual-fill-mode-map visual-fill-mode-hook variable-documentation put "Hook run after entering or leaving `visual-fill-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 visual-fill-mode " VFill" boundp provide visual-fill] 6)