From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/25807 Path: main.gmane.org!not-for-mail From: Robert Bihlmeyer Newsgroups: gmane.emacs.gnus.general Subject: Making message/rfc822 boundaries visible Date: 10 Oct 1999 23:57:28 +0200 Sender: owner-ding@hpc.uh.edu Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1035163127 15953 80.91.224.250 (21 Oct 2002 01:18:47 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 01:18:47 +0000 (UTC) Return-Path: Original-Received: from spinoza.math.uh.edu (spinoza.math.uh.edu [129.7.128.18]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id EAA14598 for ; Mon, 11 Oct 1999 04:25:04 -0400 (EDT) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by spinoza.math.uh.edu (8.9.1/8.9.1) with ESMTP id DAB06470; Mon, 11 Oct 1999 03:24:48 -0500 (CDT) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 11 Oct 1999 03:25:13 -0500 (CDT) Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id DAA22017 for ; Mon, 11 Oct 1999 03:25:03 -0500 (CDT) Original-Received: from relay8.Austria.EU.net (relay8.Austria.EU.net [193.154.160.146]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id EAA14590 for ; Mon, 11 Oct 1999 04:23:03 -0400 (EDT) Original-Received: (from uucp@localhost) by relay8.Austria.EU.net (8.9.3/8.9.3) with UUCP id KAA02671 for ding@gnus.org; Mon, 11 Oct 1999 10:12:19 +0200 (MET DST) Original-Received: (qmail 8786 invoked by uid 115); 10 Oct 1999 21:57:28 -0000 Original-To: ding@gnus.org X-Attribution: Robbe Original-Lines: 32 User-Agent: Gnus/5.070096 (Pterodactyl Gnus v0.96) XEmacs/21.1 (Biscayne) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:25807 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:25807 --=-=-= Hi, I finally decided to stop whining, and provide some code. The following, when put into your .gnus file, will render brackets around message/rfc822 parts, so you can see where an inlined message begins and ends. Nesting works out nice, too. Tested under XEmacs 21.1, but IIRC markers are also provided by FSF Emacsen. --=-=-= Content-Type: text/x-emacs-lisp Content-Disposition: inline (setf (cadr (assoc "message/rfc822" mm-inline-media-tests)) 'mm-inline-message-bracketed) (defun mm-inline-message-bracketed (handle) (insert ",---\n") (let ((end (point-marker))) (set-marker-insertion-type end t) (mm-inline-message handle) (while (< (point) end) (insert "| ") (beginning-of-line 2)) (move-marker end nil) (insert "`---\n"))) --=-=-= Adapting this to other types which have nonobviouse boundaries is easy. Robbe -- Robert Bihlmeyer reads: Deutsch, English, MIME, Latin-1, NO SPAM! --=-=-=--