;ELC   
;;; Compiled by amu@daemon on Thu Jan 11 15:03:46 2001
;;; from file /afs/sipb.mit.edu/contrib/emacs/packages/gnus-5.8.8/lisp/mm-partial.el
;;; in Emacs version 20.7.2
;;; with bytecomp version 2.56
;;; 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4567\3118\2047\2041 \312\313!\210\314\315\2128q\210\316`\317\"\2119\203J \3209!\210)\316`\321\"\206T \322 )\"B\323\"7\324:@<\203h :\202k :C7\":\212\325\326!q\2107\211A7@\2114\203\355 \327\3304A@A\236A!\327\3314A@A\236A!\211\203\263 \203\260 \f=\204\263 \312\332!\210\202\263 \f5W\204v 5=\204\307 \312\3335\"\210\3344!\210db\210\335\307x\336=\204\345 \337\340!\203\341 \336\225b\210`d|\2105T5\202v \204\366 \312\341!\2105X\203\312\3335\"\210\342@!\210eb\210\343\344\307\345#\203`S\202d;eb\210\346\347;\345#\204+\350c\210)p\240\210\311\233\345\240\210)<?\205\212\212\2146\211}\210\334!\210\307:\351\352!\210\353 \210:)\n\203x:@<\203f:\202i:C\n@<\203s\n\202u\nC\244:\354\233\355\307\356\357\360\361\362 \363 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 search-forward "\n\n" t re-search-forward "^mime-version:" "MIME-Version: 1.0\n" 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 point no-display] 12 (#$ . 1415)])