Gecko [ 122.154.134.11 ]

Name	Size	Permission
auth-source.elc	5.49 KB	-rw-r--r--
canlock.elc	6.03 KB	-rw-r--r--
compface.elc	1.35 KB	-rw-r--r--
deuglify.elc	8.31 KB	-rw-r--r--
earcon.elc	5.67 KB	-rw-r--r--
ecomplete.elc	4.45 KB	-rw-r--r--
flow-fill.elc	4.57 KB	-rw-r--r--
gmm-utils.elc	7.68 KB	-rw-r--r--
gnus-agent.elc	122.37 KB	-rw-r--r--
gnus-art.elc	258.37 KB	-rw-r--r--
gnus-async.elc	12.09 KB	-rw-r--r--
gnus-audio.elc	2.48 KB	-rw-r--r--
gnus-bcklg.elc	3.67 KB	-rw-r--r--
gnus-bookmark.elc	24.54 KB	-rw-r--r--
gnus-cache.elc	26.11 KB	-rw-r--r--
gnus-cite.elc	27.6 KB	-rw-r--r--
gnus-cus.elc	38.4 KB	-rw-r--r--
gnus-delay.elc	4.98 KB	-rw-r--r--
gnus-demon.elc	8.65 KB	-rw-r--r--
gnus-diary.elc	9 KB	-rw-r--r--
gnus-dired.elc	6.56 KB	-rw-r--r--
gnus-draft.elc	10.7 KB	-rw-r--r--
gnus-dup.elc	4.77 KB	-rw-r--r--
gnus-eform.elc	3.68 KB	-rw-r--r--
gnus-ems.elc	7.21 KB	-rw-r--r--
gnus-fun.elc	8.91 KB	-rw-r--r--
gnus-group.elc	155.85 KB	-rw-r--r--
gnus-int.elc	51.53 KB	-rw-r--r--
gnus-kill.elc	18.37 KB	-rw-r--r--
gnus-logic.elc	5.2 KB	-rw-r--r--
gnus-mh.elc	2.89 KB	-rw-r--r--
gnus-ml.elc	5.22 KB	-rw-r--r--
gnus-mlspl.elc	6.37 KB	-rw-r--r--
gnus-move.elc	3.63 KB	-rw-r--r--
gnus-msg.elc	84.07 KB	-rw-r--r--
gnus-nocem.elc	12.08 KB	-rw-r--r--
gnus-picon.elc	8.63 KB	-rw-r--r--
gnus-range.elc	11.92 KB	-rw-r--r--
gnus-registry.elc	32.46 KB	-rw-r--r--
gnus-salt.elc	29.77 KB	-rw-r--r--
gnus-score.elc	76.25 KB	-rw-r--r--
gnus-setup.elc	5.01 KB	-rw-r--r--
gnus-sieve.elc	8.54 KB	-rw-r--r--
gnus-soup.elc	16.29 KB	-rw-r--r--
gnus-spec.elc	17 KB	-rw-r--r--
gnus-srvr.elc	43.88 KB	-rw-r--r--
gnus-start.elc	142.13 KB	-rw-r--r--
gnus-sum.elc	406.63 KB	-rw-r--r--
gnus-topic.elc	46.81 KB	-rw-r--r--
gnus-undo.elc	4.07 KB	-rw-r--r--
gnus-util.elc	48.22 KB	-rw-r--r--
gnus-uu.elc	57.87 KB	-rw-r--r--
gnus-vm.elc	2.63 KB	-rw-r--r--
gnus-win.elc	12.56 KB	-rw-r--r--
gnus.elc	158.49 KB	-rw-r--r--
html2text.elc	10.59 KB	-rw-r--r--
ietf-drums.elc	7.85 KB	-rw-r--r--
legacy-gnus-agent.elc	6.67 KB	-rw-r--r--
mail-parse.elc	2.44 KB	-rw-r--r--
mail-prsvr.elc	1.29 KB	-rw-r--r--
mail-source.elc	30.28 KB	-rw-r--r--
mailcap.elc	25.11 KB	-rw-r--r--
message.elc	223.29 KB	-rw-r--r--
messcompat.elc	2.83 KB	-rw-r--r--
mm-bodies.elc	6.06 KB	-rw-r--r--
mm-decode.elc	46.1 KB	-rw-r--r--
mm-encode.elc	5.96 KB	-rw-r--r--
mm-extern.elc	4.65 KB	-rw-r--r--
mm-partial.elc	3.44 KB	-rw-r--r--
mm-url.elc	9.94 KB	-rw-r--r--
mm-util.elc	39.83 KB	-rw-r--r--
mm-uu.elc	18.57 KB	-rw-r--r--
mm-view.elc	17.58 KB	-rw-r--r--
mml-sec.elc	12.58 KB	-rw-r--r--
mml-smime.elc	14.58 KB	-rw-r--r--
mml.elc	40.35 KB	-rw-r--r--
mml1991.elc	14.71 KB	-rw-r--r--
mml2015.elc	41.93 KB	-rw-r--r--
nnagent.elc	10.86 KB	-rw-r--r--
nnbabyl.elc	17.45 KB	-rw-r--r--
nndb.elc	29.58 KB	-rw-r--r--
nndiary.elc	39.38 KB	-rw-r--r--
nndir.elc	3.2 KB	-rw-r--r--
nndoc.elc	28.12 KB	-rw-r--r--
nndraft.elc	9.95 KB	-rw-r--r--
nneething.elc	11.98 KB	-rw-r--r--
nnfolder.elc	38.93 KB	-rw-r--r--
nngateway.elc	3.1 KB	-rw-r--r--
nnheader.elc	30.94 KB	-rw-r--r--
nnimap.elc	61.12 KB	-rw-r--r--
nnir.elc	45.26 KB	-rw-r--r--
nnkiboze.elc	11.79 KB	-rw-r--r--
nnlistserv.elc	4.42 KB	-rw-r--r--
nnmail.elc	52.92 KB	-rw-r--r--
nnmaildir.elc	98.94 KB	-rw-r--r--
nnmairix.elc	72.84 KB	-rw-r--r--
nnmbox.elc	19.03 KB	-rw-r--r--
nnmh.elc	15.64 KB	-rw-r--r--
nnml.elc	45.05 KB	-rw-r--r--
nnnil.elc	1.94 KB	-rw-r--r--
nnoo.elc	8.95 KB	-rw-r--r--
nnrss.elc	33.15 KB	-rw-r--r--
nnslashdot.elc	16.43 KB	-rw-r--r--
nnsoup.elc	21.22 KB	-rw-r--r--
nnspool.elc	15.55 KB	-rw-r--r--
nntp.elc	135.97 KB	-rw-r--r--
nnultimate.elc	13.85 KB	-rw-r--r--
nnvirtual.elc	18.99 KB	-rw-r--r--
nnwarchive.elc	21.92 KB	-rw-r--r--
nnweb.elc	18.3 KB	-rw-r--r--
nnwfm.elc	12.56 KB	-rw-r--r--
pop3.elc	13.01 KB	-rw-r--r--
qp.elc	4.12 KB	-rw-r--r--
rfc1843.elc	5.74 KB	-rw-r--r--
rfc2045.elc	1.01 KB	-rw-r--r--
rfc2047.elc	25.24 KB	-rw-r--r--
rfc2104.elc	1.71 KB	-rw-r--r--
rfc2231.elc	6.9 KB	-rw-r--r--
score-mode.elc	3.56 KB	-rw-r--r--
sieve-manage.elc	19.88 KB	-rw-r--r--
sieve-mode.elc	7.1 KB	-rw-r--r--
sieve.elc	10.77 KB	-rw-r--r--
smiley.elc	5.37 KB	-rw-r--r--
smime.elc	18.81 KB	-rw-r--r--
spam-report.elc	11.77 KB	-rw-r--r--
spam-stat.elc	19.88 KB	-rw-r--r--
spam-wash.elc	1.43 KB	-rw-r--r--
spam.elc	87.54 KB	-rw-r--r--
starttls.elc	6.63 KB	-rw-r--r--
utf7.elc	6.08 KB	-rw-r--r--
webmail.elc	28.79 KB	-rw-r--r--
yenc.elc	3.85 KB	-rw-r--r--

Code Editor : nnmbox.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:01 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/gnus/nnmbox.el
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`nnmbox.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(byte-code "\302\303!\210\302\304!\210\302\305!\210\302\306!\210\302\307!\210\310\236\203'�\310\236A\311\312\313\"\240\210\2022�\310\311\312\313\"\313\211FB\310	\236\204>�\310\314D	B\313\207" [nnoo-definition-alist nnoo-state-alist require nnheader message nnmail nnoo gnus-range nnmbox mapcar list nil "*internal-non-initialized-backend*"] 4)
#@133 The name of the mail box file in the user's home directory.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnmbox-mbox-file (expand-file-name "~/mbox") (#$ . 958))
(nnoo-define 'nnmbox-mbox-file nil)
#@119 The name of the active file for the mail box.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnmbox-active-file (expand-file-name "~/.mbox-active") (#$ . 1198))
(nnoo-define 'nnmbox-active-file nil)
#@146 If non-nil, nnmbox will check the incoming mail file and split the mail.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnmbox-get-new-mail t (#$ . 1437))
(nnoo-define 'nnmbox-get-new-mail nil)
#@120 Hook run narrowed to an article before saving.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnmbox-prepare-save-mail-hook nil (#$ . 1671))
(nnoo-define 'nnmbox-prepare-save-mail-hook nil)
#@17 nnmbox version.
(defconst nnmbox-version "nnmbox 1.0" (#$ . 1900))
#@110 Current nnmbox news group directory.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnmbox-current-group nil (#$ . 1974))
(byte-code "\302\303\304\"\210\305B\306\305!\204�\307\305\304\"\210\310B\306\310!\204#�\307\310\311\"\210\302\310\304\"\210\312B\306\312!\2047�\307\312\304\"\210\302\312\304\"\210\313B\306\313!\204K�\307\313\304\"\210\302\313\304\"\210\314B\306\314!\204_�\307\314	\"\210\302\314\304\"\210\315B\306\315!\204s�\307\315\304\"\210\302\315\304\"\210\316B\306\316!\204\207�\307\316	\"\210\302\316\304\"\210\317B\306\317!\204\233�\307\317\304\"\210\302\317\304\"\210\320B\306\320!\204\257�\307\320\304\"\210\321B\306\321!\204\276�\307\321\304\"\210\322\323!\207" [current-load-list mm-binary-coding-system nnoo-define nnmbox-current-group nil nnmbox-mbox-buffer default-boundp set-default nnmbox-status-string "" nnmbox-group-alist nnmbox-active-timestamp nnmbox-file-coding-system nnmbox-file-coding-system-for-write nnmbox-active-file-coding-system nnmbox-active-file-coding-system-for-write nnmbox-group-building-active-articles nnmbox-group-active-articles nnoo-define-basics-1 nnmbox] 3)
(defalias 'nnmbox-retrieve-headers #[(sequence &optional newsgroup server fetch-old) "\212q\210\306 \210	G\307\310\211\211\311\"\210	\203\201�	@ q\210\312\f!\203W�\212\313\314!P\310\315#\210`)\316\317\310\315#\210`Sq\210\320\321\f\"c\210\322 \n#\210db\210\323c\210	A
T\"\247\203�\"V\203�\324
\325\246!\203�\326\327\330
\331_\245#\210\202�\"\247\203\224�\"V\203\224�\326\327\332\"\210q\210\333 \210.\334\207" [nntp-server-buffer sequence stop start article count erase-buffer 0 nil nnmbox-possibly-change-newsgroup nnmbox-find-article re-search-backward "^" t search-forward "\n\n" format "221 %d Article retrieved.\n" insert-buffer-substring ".\n" zerop 20 nnheader-message 5 "nnmbox: Receiving headers... %d%%" 100 "nnmbox: Receiving headers...done" nnheader-fold-continuation-lines headers number newsgroup server nnmbox-mbox-buffer message-unix-mail-delimiter nnmail-large-newsgroup] 5])
(nnoo-register-function 'nnmbox-retrieve-headers)
(defalias 'nnmbox-open-server #[(server &optional defs) "\303\304	#\210\305 \210\306\n!\204�\307 \210\310\304\311\n#\207\312\n!\203'�\307 \210\310\304\313\n#\207\310\304\314\n$\210\315\207" [server defs nnmbox-mbox-file nnoo-change-server nnmbox nnmbox-create-mbox file-exists-p nnmbox-close-server nnheader-report "No such file: %s" file-directory-p "Not a regular file: %s" "Opened server %s using mbox %s" t] 5])
(nnoo-register-function 'nnmbox-open-server)
(defalias 'nnmbox-close-server #[(&optional server) "\203�\302!\203�\303!\210\304\305	\"\210\306\207" [nnmbox-mbox-buffer server buffer-name kill-buffer nnoo-close-server nnmbox t] 3])
(nnoo-register-function 'nnmbox-close-server)
(defalias 'nnmbox-server-opened #[(&optional server) "\305\306	!\n\203�\307\310\n#\202�\232*\205*�\205*�\311!\205*�\f\205*�\311\f!\207" [server backend nnoo-parent-backend nnmbox-mbox-buffer nntp-server-buffer nnmbox nnoo-current-server format "%s+%s" buffer-name] 5])
(nnoo-register-function 'nnmbox-server-opened)
(defalias 'nnmbox-request-article #[(article &optional newsgroup server buffer) "\306	\"\210\212\nq\210\307!\205n�\310\211\311\312P\310\313#\210`\314y\210\315\312P\310\316#\2031�\317\224\2022�`\206:�\211q\210\320 \210\321\n
\f#\210eb\210\322\323!\203^�\324\325!\210\326c\210\314y\210\202K�\247\203j�B\202m�\327\310!+)\207" [newsgroup server nnmbox-mbox-buffer article stop start nnmbox-possibly-change-newsgroup nnmbox-find-article nil re-search-backward "^" t 1 re-search-forward move 0 erase-buffer insert-buffer-substring looking-at "From " delete-char 5 "X-From-Line: " nnmbox-article-group-number message-unix-mail-delimiter buffer nntp-server-buffer nnmbox-current-group] 5])
(nnoo-register-function 'nnmbox-request-article)
(defalias 'nnmbox-request-group #[(group &optional server dont-check) "\306\307\"\210\310	\n\"\211A@)\211\203�\306	\"\204\"�\311\312\313	#\202F�
\2032�\311\312\314	#\210\315\316!\202F�\311\312\314	#\210\315\317\fA\f@ZT\f@\fA	%)\207" [server group nnmbox-group-alist x active dont-check nnmbox-possibly-change-newsgroup nil assoc nnheader-report nnmbox "No such group: %s" "Selected group %s" nnheader-insert "" "211 %d %d %d %s\n"] 7])
(nnoo-register-function 'nnmbox-request-group)
(defalias 'nnmbox-save-buffer #[nil "\206�	\303 )\207" [nnmbox-file-coding-system-for-write nnmbox-file-coding-system coding-system-for-write save-buffer] 1])
(defalias 'nnmbox-save-active #[(group-alist active-file) "\206�	\305\f\")\207" [nnmbox-active-file-coding-system-for-write nnmbox-active-file-coding-system nnmail-active-file-coding-system group-alist active-file nnmail-save-active] 3])
(defalias 'nnmbox-request-scan #[(&optional group server) "\303	\"\210\304 \210\305\306\307\310\n!\311%\207" [group server nnmbox-mbox-file nnmbox-possibly-change-newsgroup nnmbox-read-mbox nnmail-get-new-mail nnmbox #[nil "\212q\210\301 )\207" [nnmbox-mbox-buffer nnmbox-save-buffer] 1] file-name-directory #[nil "\212p	q\210db\210\304!\210*\305\n\"\207" [in-buf nnmbox-mbox-buffer nnmbox-group-alist nnmbox-active-file insert-buffer-substring nnmbox-save-active] 3]] 6])
(nnoo-register-function 'nnmbox-request-scan)
(defalias 'nnmbox-close-group #[(group &optional server) "\300\207" [t] 1])
(nnoo-register-function 'nnmbox-close-group)
(defalias 'nnmbox-request-create-group #[(group &optional server args) "\303\304!\210\305	\"\204�\306\307BD	B\310	\n\"\210\311\207" [group nnmbox-group-alist nnmbox-active-file nnmail-activate nnmbox assoc 1 0 nnmbox-save-active t] 3])
(nnoo-register-function 'nnmbox-request-create-group)
(defalias 'nnmbox-request-list #[(&optional server) "\212\304\n!\210)\305 )\306\207" [nnmbox-active-file-coding-system nnmail-file-coding-system nnmbox-active-file nnmbox-group-alist nnmail-find-file nnmail-get-active t] 2])
(nnoo-register-function 'nnmbox-request-list)
(defalias 'nnmbox-request-newgroups #[(date &optional server) "\301!\207" [server nnmbox-request-list] 2])
(nnoo-register-function 'nnmbox-request-newgroups)
(defalias 'nnmbox-request-list-newsgroups #[(&optional server) "\300\301\302\"\207" [nnheader-report nnmbox "LIST NEWSGROUPS is not implemented."] 3])
(nnoo-register-function 'nnmbox-request-list-newsgroups)
(defalias 'nnmbox-request-expire-articles #[(articles newsgroup &optional server force) "\306	\"\210\307\310\311\312!\210\212\fq\210
\203t�\n\203t�\313
@!\203m�\314`\310\210`{#\211\203h�\315=\204Z�\316\317!rq\210\320\216\321
@	p$\210\310\322\"\210,\306	\"\210\323\324\325
@$\210\326 \210\202m�
@B
A\211\204�\327 \210\330\"A@\313@!\204\234�@AX\203\234�\211@T\240\210\202\200�)\331 \"\210
\244+\207" [newsgroup server is-old rest nnmbox-mbox-buffer articles nnmbox-possibly-change-newsgroup t nil nnmail-activate nnmbox nnmbox-find-article nnmail-expired-article-p delete generate-new-buffer " *temp*" ((byte-code "\301!\203\n�\302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) nnmbox-request-article nnmail-expiry-target-group nnheader-message 5 "Deleting article %d in %s..." nnmbox-delete-mail nnmbox-save-buffer assoc nnmbox-save-active force nnmail-expiry-target #1# nnml-current-directory nnmbox-group-alist active nnmbox-active-file] 6])
(nnoo-register-function 'nnmbox-request-expire-articles)
(defalias 'nnmbox-request-move-article #[(article group server accept-form &optional last move-is-internal) "\306\307!\310\311\n\f#\203a�\212	q\210\312 \210\313
!\210eb\210\314\315\212\316\317\310\320#\210`)\320#\2037�\321 \322y\210`|\210\202�\323!\324	!\210)\203a�\212\325\f\"\210q\210\326\n!\203X�\327 \210\203`�\330 \210)*\207" [result buf article group server nntp-server-buffer get-buffer-create " *nnmbox move*" nil nnmbox-request-article erase-buffer insert-buffer-substring re-search-forward "^X-Gnus-Newsgroup:" search-forward "\n\n" t point-at-bol 1 eval kill-buffer nnmbox-possibly-change-newsgroup nnmbox-find-article nnmbox-delete-mail nnmbox-save-buffer accept-form nnmbox-mbox-buffer last] 6])
(nnoo-register-function 'nnmbox-request-move-article)
(defalias 'nnmbox-request-accept-article #[(group &optional server last) "\306	\"\210\307 \210p\310\211\311\312!\203\330�\313\314!r
q\210\315\216\316\f!\210eb\210\317\320.P!\2038�\321\322!\210\322y\210\202O�\317\323!\203H�\324\325!\210\322y\210\202O�\326\327 \330\261\210`\331\332\310\333#\203]�`S\202^�`}\210\334\335\310\336#\203r�`\322y\210`|\210\202`�/\203\204�\337\340\341!\340\342!\340\343!$\210~\210;\203\224�\344!BC\202\227�\345\344!\211\204\250�\346\347!\203\250�\350\211\202\256�\351!@\211\352 +\203\330�r0q\210db\210\nc\2101\203\327�/\203\315�\353 \210\35423\"\210\355 \210)+\207" [group server cont result buf #1=#:temp-buffer nnmbox-possibly-change-newsgroup nnmail-check-syntax nil nnmail-activate nnmbox generate-new-buffer " *temp*" ((byte-code "\301!\203\n�\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-buffer-substring looking-at ">" delete-char 1 "X-From-Line: " replace-match "From " "From nobody " current-time-string "\n" search-forward "\n\n" move re-search-backward "^X-Gnus-Newsgroup: " t nnmail-cache-insert message-fetch-field "message-id" "subject" "from" nnmbox-active-number nnmail-article-group yes-or-no-p "Moved to `junk' group; delete article? " junk nnmbox-save-mail buffer-string nnmail-cache-close nnmbox-save-active nnmbox-save-buffer message-unix-mail-delimiter nnmail-cache-accepted-message-ids nnmbox-mbox-buffer last nnmbox-group-alist nnmbox-active-file] 7])
(nnoo-register-function 'nnmbox-request-accept-article)
(defalias 'nnmbox-request-replace-article #[(article group buffer) "\306!\210\212	q\210\307\n!\205X�\310\311\211\"\210\312\313!rq\210\314\216\315\f!\210eb\210\316\317!\2031�`\320y\210`|\210\321\322
P\323\311#\203E�\324\224b\210\325c\210\2021�db\210n\204O�\326c\210\327 +c\210\330 \210\311)\207" [group nnmbox-mbox-buffer article #1=#:temp-buffer buffer message-unix-mail-delimiter nnmbox-possibly-change-newsgroup nnmbox-find-article nnmbox-delete-mail t generate-new-buffer " *temp*" ((byte-code "\301!\203\n�\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-buffer-substring looking-at "X-From-Line:" 1 re-search-forward "^" nil 0 ">" "\n" buffer-string nnmbox-save-buffer] 4])
(nnoo-register-function 'nnmbox-request-replace-article)
(defalias 'nnmbox-request-delete-group #[(group &optional force server) "\306	\"\210\n\2031�\212q\210eb\210\307\f\310Q\311\312\311\313#\203)�\313\314 \210\202�
\2030�\315 \210+\316\317\"\"\311\320\"\210\313\207" [group server force nnmbox-mbox-buffer nnmbox-current-group found nnmbox-possibly-change-newsgroup "\nX-Gnus-Newsgroup: " ":" nil search-forward t nnmbox-delete-mail nnmbox-save-buffer delq assoc nnmbox-save-active ident nnmbox-group-alist nnmbox-active-file] 4])
(nnoo-register-function 'nnmbox-request-delete-group)
(defalias 'nnmbox-request-rename-group #[(group new-name &optional server) "\306	\"\210\212\nq\210eb\210\307\310Q\307\f\310Q\311\312\311\313#\203/�\314\313\211#\210\313\202�
\2036�\315 \210,\316\"\211\203G�\f\240\210)\316\"\211\203X�\f\240\210\311\317\"\210)\313\207" [group server nnmbox-mbox-buffer nnmbox-current-group new-name found nnmbox-possibly-change-newsgroup "\nX-Gnus-Newsgroup: " ":" nil search-forward t replace-match nnmbox-save-buffer assoc nnmbox-save-active new-ident ident nnmbox-group-active-articles entry nnmbox-group-alist nnmbox-active-file] 5])
(nnoo-register-function 'nnmbox-request-rename-group)
(defalias 'nnmbox-delete-mail #[(&optional force leave-delim) "\204\n�\303\304\305!!\210\204�\306 \307y\210`|\210\212\214\310\311	P\312\305#\210\n\203+�\307y\210`\202-�\313\224\307y\210\314\311	P\312\305#\203?�\313\224\206@�d}\210eb\210\204Y�\314\315\312\305#\203Y�\316\317\312\305#\205\\�ed|*\207" [force message-unix-mail-delimiter leave-delim nnmbox-record-deleted-article nnmbox-article-group-number t point-at-bol 1 re-search-backward "^" nil 0 re-search-forward "^X-Gnus-Newsgroup: " search-backward "\n\n"] 5])
(defalias 'nnmbox-possibly-change-newsgroup #[(newsgroup &optional server) "\203�\305!\204�\306!\210	\203�\307	!\204�\310 \210\n\204#�\311\312!\210\2032�\313\n\"\2053�\211\207\314\207" [server nnmbox-mbox-buffer nnmbox-group-alist newsgroup nnmbox-current-group nnmbox-server-opened nnmbox-open-server buffer-name nnmbox-read-mbox nnmail-activate nnmbox assoc t] 3])
(defalias 'nnmbox-article-string #[(article) "\247\203�\302	\303\304!\305\260\207\306P\207" [article nnmbox-current-group "\nX-Gnus-Newsgroup: " ":" int-to-string " " "\nMessage-ID: "] 5])
(defalias 'nnmbox-article-group-number #[(this-line) "\212\203�\301 \210\202�eb\210\302\303\304\305#\205#�\306\224\306\225{\307\310\224\310\225{!B)\207" [this-line beginning-of-line re-search-forward "^X-Gnus-Newsgroup: +\$[^:]+\$:\$[0-9]+\$ " nil t 1 string-to-number 2] 4])
#@55 Return non-nil if POS is in the header of an article.
(defalias 'nnmbox-in-header-p #[(pos) "\212b\210\302\303	P\304\305#\210\306\307\304\305#\210`W)\207" [pos message-unix-mail-delimiter re-search-backward "^" nil t search-forward "\n\n"] 4 (#$ . 15038)])
#@62 Leaves point on the relevant X-Gnus-Newsgroup line if found.
(defalias 'nnmbox-find-article #[(article) "\247\205	�\303!??\205:�\304!\305\306\n\305\307#\203!�\310`!\2069�eb\210	\2048�\306\n\305\307#\2038�\310`!\211\203(�	*\207" [article found art-string nnmbox-is-article-active-p nnmbox-article-string nil search-forward t nnmbox-in-header-p] 5 (#$ . 15303)])
(defalias 'nnmbox-record-active-article #[(group-art) "@A\306	\"\206�	CB\211@
\204$�\f\307\fA\nC\"\241\202]�\n\fA>\2036�\310\f!\210\311\312	\n#\210\f\211
A@)\203W�\n\f\211
A@)W\203W�\310\f!\210\311\313	\n#\210\f\n\fAB\241+\207" [group-art group article nnmbox-group-active-articles entry nnmbox-group-building-active-articles assoc gnus-add-to-range switch-to-buffer error "Article %s:%d already exists!" "Article %s:%d out of order" nnmbox-mbox-buffer x] 5])
(defalias 'nnmbox-record-deleted-article #[(group-art) "@A\305	\"\206�	CB\211@\211\306\fA\nC\"\241+\207" [group-art group article nnmbox-group-active-articles entry assoc gnus-remove-from-range] 5])
(defalias 'nnmbox-is-article-active-p #[(article) "\303\304	\n\"A\"\207" [article nnmbox-current-group nnmbox-group-active-articles gnus-member-of-range assoc] 5])
#@32 Called narrowed to an article.
(defalias 'nnmbox-save-mail #[(group-art) "\304Peb\210\305	!\203�\306y\210\202�\307\310 \311\261\210\312	\313\314#\203,�\315\224b\210\316c\210\202�)db\210n\2047�\311c\210\317 \210\320\n!\210\321\n!\210\n\211\203T�\322@!\210A\211\204H�)\323\324!\210\323\325!\210\n\207" [message-unix-mail-delimiter delim group-art alist "^" looking-at 1 "From nobody " current-time-string "\n" re-search-forward nil t 0 ">" nnmail-insert-lines nnmail-insert-xref nnmbox-insert-newsgroup-line nnmbox-record-active-article run-hooks nnmail-prepare-save-mail-hook nnmbox-prepare-save-mail-hook] 5 (#$ . 16522)])
(defalias 'nnmbox-insert-newsgroup-line #[(group-art) "\212eb\210\302\303\304\305#\203-�\306u\210\203-�\307\310\211@@)\211@A)\311 $c\210A\211\204�)\305\207" [group-art x search-forward "\n\n" nil t -1 format "X-Gnus-Newsgroup: %s:%d   %s\n" current-time-string] 6])
(defalias 'nnmbox-active-number #[(group) "\304	\"\211A@)\211\203�\211AT\241\210\202!�\305\211B\211D	BA)\207" [group nnmbox-group-alist x active assoc 1] 4])
(defalias 'nnmbox-create-mbox #[nil "\305!?\205!�	\206\f�\n\306!\203�\307!\210\310ee\311\312%*\207" [nnmbox-mbox-file nnmbox-file-coding-system-for-write nnmbox-file-coding-system dir nnmail-file-coding-system file-exists-p file-name-directory gnus-make-directory nnmail-write-region t nomesg] 6])
(defalias 'nnmbox-read-mbox #[nil "\306\307!\210\310 \210\205�\311!\205�\212q\210\312 \313	!U)?\205D\212\314\nP\315\316\211\211\211'()*+,-\317	\315\211#)\211q\210\320 \210\321 \210*\203\220�db\210\322\323\324*\211.@@)\"\316\315#\203\207�\325\326\224\326\225{!\211*\211.@A)@AV\203\207�*\211.@A)@\f\241\210*A\211*\204O�eb\210\316/\327+\316\315#\203 \330\224(\212\331\332\316\315#\210`\327+\316\315#\203\272�\330\224\206\273�d')\331\333
\315#\203\335�\334\335\315!!\210\331\333
\315#\203\334\335\315!!\210\202\314�\212\214('}\210\327\336
\315#\203\316*\327\337
\315#\203	\340\326!\325\340\341!!B*B*\202\360�\342*!\210)\202\343\344\345!!\210*'b\210\202\226�/\211*\205B*@\346*\211.@A)\237!\241\210*A\211*\204(\316.\207" [nnmbox-mbox-buffer nnmbox-mbox-file message-unix-mail-delimiter nnmbox-group-alist number end-header nnmail-activate nnmbox nnmbox-create-mbox buffer-name buffer-size nnheader-file-size "^" t nil nnheader-find-file-noselect mm-enable-multibyte buffer-disable-undo re-search-backward format "^X-Gnus-Newsgroup: %s:\$[0-9]+\$ " string-to-number 1 re-search-forward 0 search-forward "\n\n" "\nX-Gnus-Newsgroup: " nnmbox-record-active-article nnmbox-article-group-number "\nXref: [^ ]+" " \$[^:]+\$:\$[0-9]+\$" match-string 2 nnmbox-insert-newsgroup-line nnmbox-save-mail nnmail-article-group nnmbox-active-number gnus-compress-sequence end start nnmbox-group-building-active-articles alist delim nnmbox-file-coding-system nnheader-file-coding-system x nnmbox-group-active-articles] 8])
(provide 'nnmbox)

${this.title}

Code Editor : nnmbox.elc