;ELC   
;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:45:01 2003
;;; from file /home/pot/gnu/emacs-pretest.new/lisp/gnus/mm-partial.el
;;; in Emacs version 21.3
;;; with bytecomp version 2.85.4.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 "`mm-partial.el' was compiled for Emacs 19.29 or later"))

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


(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require gnus-sum mm-util mm-decode] 2)
(defalias 'mm-partial-find-parts #[(id &optional art) "\212q\210	)\306\211\f\211A@\211\203x \n\307H=\204 \306\310\311\312!!\313\216rq\210\314\n\307H\"\210\315\306\316#\203t \317 \306\211@:\203T \320!\210\202s \321A@A\236A\232\204n \320!\210\202s B*,\202 +\207" [gnus-summary-buffer gnus-newsgroup-headers header phandles headers art nil 0 get-buffer-create generate-new-buffer-name " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) gnus-request-article-this-buffer search-forward t mm-dissect-buffer mm-destroy-parts id default-enable-multibyte-characters #1# gnus-newsgroup-name nid nhandles] 5])
#@195 Show the partial part of HANDLE.
This function replaces the buffer of HANDLE with a buffer contains 
the entire message.
If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing.
(defalias 'mm-inline-partial #[(handle &optional no-display) "\306A@A\236A\307`\310\307\211\211\211\211\211\211/012\3118\204\2041 \312\313!\210\314\315\2123q\210\316`\317\"\2114\203J \3204!\210)\316`\321\"\206T \322 )\"B\323\"2\3245@<\203h 5\202k 5C2\"5\212\325\326!q\2102\211A2@\211/\203\355 \327\330/A@A\236A!\327\331/A@A\236A!\211\203\263 \203\260 \f=\204\263 \312\332!\210\202\263 \f0W\204v 0=\204\307 \312\3330\"\210\334/!\210db\210\335\307x\336=\204\345 \337\340!\203\341 \336\225b\210`d|\2100T0\202v \204\366 \312\341!\2100X\203\312\3330\"\210\342@!\210p\240\210\311\233\343\240\210)6?\205g\212\2141\211}\210\334!\210\3075\344\345!\210\346 \2105)\n\203U5@<\203C5\202F5C\n@<\203P\n\202R\nC\2445\347\233\350\307\351\352\353\354\355 \356 EFE\240*.\207" [handle buffer handles gnus-displaying-mime ntotal nn id nil 1 6 error "Can not find message/partial id" sort mm-partial-find-parts get-text-property gnus-intangible gnus-summary-goto-subject gnus-number gnus-summary-last-subject #[(a b) "\304\305A@A\236A!\304\305	A@A\236A!\211\nW*\207" [a b bnumber anumber string-to-number number] 5] append generate-new-buffer " *mm*" string-to-number number total "The numbers of total are different" "Missing part %d" mm-insert-part "\n" 0 looking-at "?\n" "Don't known the total number of" kill-buffer t run-hooks gnus-article-decode-hook gnus-article-prepare-display 3 lambda let (buffer-read-only) (condition-case nil (mapcar (lambda (prop) (remove-specifier (face-property 'default prop) (current-buffer))) '(background background-pixmap foreground)) (error nil)) delete-region point-min-marker point-max-marker phandle n b phandles gnus-summary-buffer to gnus-article-mime-handles no-display] 12 (#$ . 1412)])