"Rich" == Rich Graves <llurch@networking.stanford.edu> writes:
Rich> On Wed, 3 Jul 1996, Charles Watt wrote:
-----BEGIN PRIVACY-ENHANCED MESSAGE-----
Rich> And then there's the part about it being ugly as sin ... (defun gnus-article-hide-pem (&optional arg) "Toggle hiding of any PEM headers and signatures in the current article. If given a negative prefix, always show; if given a positive prefix, always hide. Adapted from gnus-article-hide-pgp." (interactive (gnus-hidden-arg)) (unless (gnus-article-check-hidden-text 'pem arg) (save-excursion (set-buffer gnus-article-buffer) (let ((props (nconc (list 'gnus-type 'pem) gnus-hidden-properties)) buffer-read-only end) (widen) (goto-char (point-min)) ;; hide the horrendously ugly "header". (and (search-forward "\n-----BEGIN PRIVACY-ENHANCED MESSAGE-----\n" nil t) (setq end (1+ (match-beginning 0))) (gnus-hide-text end (if (search-forward "\n\n" nil t) (match-end 0) (point-max)) props)) ;; hide the trailer as well (and (search-forward "\n-----END PRIVACY-ENHANCED MESSAGE-----\n" nil t) (gnus-hide-text (match-beginning 0) (match-end 0) props)))))) -- steve@miranova.com baur Unsolicited commercial e-mail will be proofread for $250/hour. Andrea Seastrand: For your vote on the Telecom bill, I will vote for anyone except you in November.