MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.117.158.174
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/gnus/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/gnus/spam-wash.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:10:28 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/gnus/spam-wash.el
;;; in Emacs version 24.3.1
;;; 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.

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


(require 'gnus-art)
#@50 Treat the current buffer prior to spam analysis.
(defalias 'spam-wash #[nil "\306\307!\210\212\214\310\311p\312\310\"\206\f\205\313 \310\203*\314!\210\310

\205F
@;\203<
A\205F\315 \210`d|\210\316
!.\207" [buffer-read-only gnus-inhibit-treatment gnus-article-buffer gnus-article-loose-mime gnus-article-emulate-mime handles run-hooks gnus-article-decode-hook nil t mm-dissect-buffer mm-uu-dissect mm-destroy-parts article-goto-body spam-treat-parts handle gnus-article-mime-handles gnus-article-mime-handle-alist] 3 (#$ . 577) nil])
(defalias 'spam-treat-parts #[(handle) "@;\203\f\302\303A\"\207\304@!\203-\214``}\210\305\306\307A@@\")\203)\310!\210db)\207\302\303\"\207" [handle case-fold-search mapcar spam-treat-parts bufferp t string-match "text" mm-insert-part] 3])
(provide 'spam-wash)

MMCT - 2023