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 : gnus-draft.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:03:26 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/gnus/gnus-draft.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 "`gnus-draft.el' was compiled for Emacs 19.29 or later"))

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

(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\207" [require gnus gnus-sum message gnus-msg nndraft gnus-agent] 2)
#@51 Minor mode for providing a draft summary buffers.
(defvar gnus-draft-mode nil (#$ . 771))
(byte-code "\301B\302\301!\204�\303\301\304\"\210	\204�\305 \306\301\307\"\210\304\207" [current-load-list gnus-draft-mode-map default-boundp set-default nil make-sparse-keymap gnus-define-keys-1 ("Dt" gnus-draft-toggle-sending "e" gnus-draft-edit-message "De" gnus-draft-edit-message "Ds" gnus-draft-send-message "DS" gnus-draft-send-all-messages)] 3)
(defalias 'gnus-draft-make-menu-bar #[nil "\301\302!?\205�\303\302\304\305#\210\306\302!\204�\307\302\310\"\210\311\302\305\312$\207" [gnus-draft-mode-map boundp gnus-draft-menu put variable-documentation "" default-boundp set-default nil easy-menu-do-define ("Drafts" ["Toggle whether to send" gnus-draft-toggle-sending t] ["Edit" gnus-draft-edit-message t] ["Send selected message(s)" gnus-draft-send-message t] ["Send all messages" gnus-draft-send-all-messages t] ["Delete draft" gnus-summary-delete-article t])] 5])
#@75 Minor mode for providing a draft summary buffers.

\{gnus-draft-mode-map}
(defalias 'gnus-draft-mode #[(&optional arg) "\304=\2050�\305\302!\210	\204�\n?\202�\306	!\307V\211\2050�\310\311\312\"\203'�\313 \210\314\302\315#\210\316\317!\207" [major-mode arg gnus-draft-mode gnus-draft-mode-map gnus-summary-mode make-local-variable prefix-numeric-value 0 gnus-visual-p draft-menu menu gnus-draft-make-menu-bar add-minor-mode " Draft" gnus-run-hooks gnus-draft-mode-hook] 4 (#$ . 1748) "P"])
#@43 Toggle whether to send an article or not.
(defalias 'gnus-draft-toggle-sending #[(article) "\304!\203�	B\305\n\"\210\202�\306	\"\305\"\210\307 \207" [article gnus-newsgroup-unsendable gnus-unsendable-mark gnus-unread-mark gnus-draft-article-sendable-p gnus-summary-mark-article delq gnus-summary-position-point] 3 (#$ . 2248) (list (gnus-summary-article-number))])
#@54 Enter a mail/post buffer to edit and send the draft.
(defalias 'gnus-draft-edit-message #[nil "\306`\307\"\211\203
�\310!\210)\306`\311\"\206�\312 	\313C!\210\314\f\"\210\315\n\316#\210\317\316!\210\212\214\320 \210\321\322!\210*\323\324\325
!\"\326 \210)\327 \330C\n\316#\210)\331\327\332\333!D\334\335!D\336\337BBEEEC\"B\211\"*\207" [to gnus-newsgroup-name group article gnus-canceled-mark message-draft-headers get-text-property gnus-intangible gnus-summary-goto-subject gnus-number gnus-summary-last-subject gnus-draft-check-draft-articles gnus-summary-mark-as-read gnus-draft-setup t set-buffer-modified-p message-narrow-to-headers message-remove-header "date" delq Date copy-sequence save-buffer nil gnus-request-expire-articles lambda when gnus-buffer-exists-p save-excursion set-buffer gnus-cache-possibly-remove-article (nil nil nil t) gnus-verbose-backends gnus-summary-buffer message-send-actions] 10 (#$ . 2629) nil])
#@74 Send the current draft(s).
Obeys the standard process/prefix convention.
(defalias 'gnus-draft-send-message #[(&optional n) "\306!\211G\307\310	!\210	\211A@\211\205;�\311!\210\f>\204
�\312\313\n	GZ\n#\314\315#\210)\316\"\210\202
�+\207" [n articles total article gnus-newsgroup-unsendable message-sending-message gnus-summary-work-articles nil gnus-draft-check-draft-articles gnus-summary-remove-process-mark format "Sending message %d of %d..." gnus-draft-send t gnus-summary-mark-article gnus-newsgroup-name gnus-canceled-mark] 5 (#$ . 3581) "P"])
#@23 Send message ARTICLE.
(defalias 'gnus-draft-send #[(article &optional group interactive) "?\206�\306\232\n\203�\202�\307\310	\206�
	?\205\"�  	?\205+�!!	?\2054�\"\"	?\205=�##	?\205F�$$\310\211%&\310\211'(\311)\206\\�\306\"\210\214\312 \210\313\314\315*!\316Q\310\317#\203�\320\321!\210`\322 {(\323*!\210eb\210\313\314\315+!\316Q\310\317#\203\241�\310\324\325\217&\310\326\327\217'\323+!\210)\330 \210'\203\270�\331'!\204\270�\332'!\205&\203\342�&\333=&\334='\211,-./(\203\334�\335(!\202\336�\336 ,\202\360�(\203\356�\335(!\202\360�\336 \205\3100\337)C\206\377�\306\317#).
\207" [group is-queue interactive message-syntax-checks message-hidden-headers message-inhibit-body-encoding "nndraft:queue" dont-check-for-anything-just-trust-me nil gnus-draft-setup message-narrow-to-headers re-search-forward "^" regexp-quote ":" t skip-syntax-forward "-" point-at-eol message-remove-header (byte-code "\300p!\207" [read] 2) ((error)) (byte-code "\300p!\207" [read] 2) ((error)) gnus-agent-restore-gcc gnus-server-opened gnus-open-server news mail gnus-inews-do-gcc message-send-and-exit gnus-request-expire-articles message-send-hook message-setup-hook gnus-message-setup-hook message-signature gnus-agent-queue-mail rfc2047-encode-encoded-words type method move-to article gnus-agent-target-move-group-header gnus-agent-meta-information-header message-post-method gnus-post-method message-this-is-mail message-this-is-news gnus-verbose-backends] 5 (#$ . 4152)])
#@31 Send all the sendable drafts.
(defalias 'gnus-draft-send-all-messages #[nil "\204\n�\301\302!\205�\303 \210\304 \207" [gnus-expert-user gnus-y-or-n-p "Send all drafts? " gnus-uu-mark-buffer gnus-draft-send-message] 2 (#$ . 5670) nil])
#@50 Send all sendable articles from the queue group.
(defalias 'gnus-group-send-queue #[nil "\204�	\203�\306\307!\205Z�\310\311!\210\212\312 \313\314\315\316\317\311\"J88\236A!\320\211\nG\320\n\211A@\211\205X�\f>\2041�\321\322\nGZ#\323!\210)\2021�.\207" [gnus-plugged gnus-agent-prompt-send-queue articles gnus-newsrc-hashtb unsendable gnus-posting-styles gnus-y-or-n-p "Gnus is unplugged; really send queue? " gnus-activate-group "nndraft:queue" nndraft-articles gnus-uncompress-range unsend 3 2 intern-soft nil format "Sending message %d of %d..." gnus-draft-send message-send-mail-partially-limit total article message-sending-message] 8 (#$ . 5913) nil])
#@43 Reminder user if there are unsent drafts.
(defalias 'gnus-draft-reminder #[nil "\301 \205�\302\303\304\215)\207" [active gnus-alive-p nil continue (byte-code "\303\304\211\2034�	@\305!\211\203-�\nA\n@Y\203-�\306\307!\203)�\310\311\312\"\210\202-�\313\314!\210	A\211\204�*\304\207" [group #1=#:--cl-dolist-temp-- active ("nndraft:drafts" "nndraft:queue") nil gnus-activate-group y-or-n-p "There are unsent drafts.  Confirm to exit? " throw continue t error "Stop!"] 4)] 2 (#$ . 6601) nil])
#@43 Hook run after setting up a draft buffer.
(custom-declare-variable 'gnus-draft-setup-hook 'nil '(#$ . 7105) :group 'gnus-message :version "23.1" :type 'hook)
(defalias 'gnus-draft-setup #[(narticle group &optional restore) "\306\307 \310p!	\n\311\f!
\311
!
<=>?@A\306\312\304\313\"\210\312\304\314\"\210\312\315\316\"\210\312\315\317\"\210\320\321B\236B\"B=\203`�=\322\230\204`�\323C!\324>\206Y�?!BBBB\325\216DE\326 \210\327 \210\330EF\"\204|�\331\332!\210\202\252�G\203\213�F\333\232\203\213�\334 \210eb\210\335\336!\210\337u\210\214e`}\210\340C!)Hc\210\341y\210\342 \210*\343 \210\344 \210\345\346\347\"\210\350\351!\210\352\306!\210.\353FD\"\210\2036\306\354\355\217\2036@\322\232?\205\334�@\356 \210\211IA@)BJ\357\360\361\362@EEK\211IA@)\322\232\2046A\306E\211L\2035L@E\363\364\365@\366EF\367@\370\211\211ED\371BBDEE\372\"\210LA\211L\204\f*\350\373!)\207" [ga gnus-article-reply gnus-article-yanked-articles gnus-newsgroup-name message-header-setup-hook mml-buffer-list nil current-window-configuration buffer-name copy-sequence add-hook gnus-inews-insert-gcc gnus-inews-insert-archive-gcc message-mode-hook #[nil "\302 \211\211\207" [message-mailer message-newsreader gnus-extended-version] 2] #[nil "\302\303	!)\207" [gnus-article-copy #1=#:gnus-setup-message-group nil gnus-configure-posting-styles] 2] delq X-Draft-From "" intern gnus-inews-make-draft ((byte-code "\306	\n\307%\210p\310\311!\210
\nB	\310\312!\210
\n\203#�\313\314!\210\315\316!\210\317=\203X�\310\320!\210\321\322!\210\321\323!\210\324\323\325\326\327$\210\324\322\325\327\211$\210)\202_�\325 \210\326\207" [#2=#:gnus-setup-message-winconf #3=#:gnus-setup-message-buffer #4=#:gnus-setup-message-article #5=#:gnus-setup-yanked-articles gnus-message-buffer #1# gnus-inews-add-send-actions forward make-local-variable gnus-message-group-art gnus-newsgroup-name gnus-message-citation-mode 1 gnus-run-hooks gnus-message-setup-hook message-mode mml-buffer-list gnus-make-local-hook kill-buffer-hook change-major-mode-hook add-hook mml-destroy-buffers nil t gnus-message-highlight-citation major-mode mbl1 mbl] 6)) message-mail erase-buffer gnus-request-restore-buffer error "Couldn't restore the article" "nndraft:queue" mime-to-mml search-forward "\n\n" -1 message-fetch-field 1 message-set-auto-save-file-name message-hide-headers gnus-add-buffer gnus-configure-windows forward t run-hooks post-command-hook set-buffer-modified-p gnus-backlog-remove-article (byte-code "\301!@\211\207" [ga read-from-string] 2) ((error)) gnus-configure-posting-styles lambda (arg) gnus-post-method arg message-add-action progn gnus-add-mark 'replied gnus-request-set-mark list ('add '(reply)) send gnus-draft-setup-hook mbl #1# #5# #4# #3# #2# message-required-headers gnus-draft-meta-information-header narticle article group restore mail-header-separator x gnus-message-group-art message-post-method #6=#:--cl-dolist-temp--] 11])
#@34 Say whether ARTICLE is sendable.
(defalias 'gnus-draft-article-sendable-p #[(article) "	>?\207" [article gnus-newsgroup-unsendable] 2 (#$ . 10089)])
#@59 Check whether the draft articles ARTICLES are under edit.
(defalias 'gnus-draft-check-draft-articles #[(articles) "\306\232\205{�\307 \310\211\211r
\203O�	\204O�\311
\211A@!\f\n\203�\n\211A@\211q\210\203J�\312!\312!\230\203J�\313 \203J�\310\211\202#�\310\202\"�)	\205z�\314	\315\"\211\205b�\316!\211\203p�\317!\210\202u�\320	\315\"\210*\321\322\",\207" [gnus-newsgroup-name buff buffs file buffers articles "nndraft:drafts" buffer-list nil nndraft-article-filename file-truename buffer-modified-p get-buffer-window t window-frame gnus-select-frame-set-input-focus pop-to-buffer error "The draft %s is under edit" buffer-file-name window frame] 5 (#$ . 10245)])
(provide 'gnus-draft)

${this.title}

Code Editor : gnus-draft.elc