From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/17269 Path: main.gmane.org!not-for-mail From: Shenghuo ZHU Newsgroups: gmane.emacs.gnus.general Subject: Re: 2 wishes Date: 20 Sep 1998 00:53:01 -400 Organization: Computer Dept of U Rochester Sender: owner-ding@hpc.uh.edu Message-ID: <2nsohnjsgi.fsf@zsh.cs.rochester.edu> References: <5bzpc09dz7.fsf@whiskey.cs.rochester.edu> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: main.gmane.org 1035155999 32468 80.91.224.250 (20 Oct 2002 23:19:59 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 23:19:59 +0000 (UTC) Return-Path: Original-Received: from gizmo.hpc.uh.edu (gizmo.hpc.uh.edu [129.7.102.31]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id AAA29270 for ; Sun, 20 Sep 1998 00:47:38 -0400 (EDT) Original-Received: from sina.hpc.uh.edu (sina.hpc.uh.edu [129.7.3.5]) by gizmo.hpc.uh.edu (8.7.6/8.7.3) with ESMTP id XAF19182; Sat, 19 Sep 1998 23:18:37 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sat, 19 Sep 1998 23:47:22 -0500 (CDT) Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [209.195.19.139]) by sina.hpc.uh.edu (8.7.3/8.7.3) with ESMTP id XAA02889 for ; Sat, 19 Sep 1998 23:47:11 -0500 (CDT) Original-Received: from cayuga.cs.rochester.edu (cayuga.cs.rochester.edu [192.5.53.209]) by sclp3.sclp.com (8.8.5/8.8.5) with SMTP id AAA29256 for ; Sun, 20 Sep 1998 00:47:05 -0400 (EDT) Original-Received: from slate.cs.rochester.edu (slate.cs.rochester.edu [192.5.53.101]) by cayuga.cs.rochester.edu (8.6.9/O) with ESMTP id AAA18025 for ; Sun, 20 Sep 1998 00:47:04 -0400 Original-Received: from brain.cs.rochester.edu (heart.cs.rochester.edu [192.5.53.109]) by slate.cs.rochester.edu (8.6.9/O) with ESMTP id AAA05048 for ; Sun, 20 Sep 1998 00:47:01 -0400 Original-Received: (from zsh@localhost) by brain.cs.rochester.edu (8.9.0/8.8.5) id AAA00914; Sun, 20 Sep 1998 00:53:02 -0400 Original-To: ding@gnus.org X-Attribution: ZSH Original-Lines: 81 User-Agent: Gnus/5.070031 (Pterodactyl Gnus v0.31) XEmacs/20.4 (Emerald) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:17269 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:17269 >>>>> "LMI" == Lars Magne Ingebrigtsen writes: LMI> zsh@cs.rochester.edu (Öìʤ»ð) writes: >> 1. gnus-mime-inline-part toggles the inline part. >> >> Press "i" on mime button, the part shows. Press again, the part hides >> instead of showing two copies. LMI> Do you mean that it should do this, or that this is what it does, LMI> and that's a bug? I thought it was not a bug. Unfortunately, it is. A patch attached. >> 2. make uu parts shown as mime buttons. LMI> Yes, that would be nice, but I think we should get the real MIME LMI> things under control first. I've made postscript parts and uuencoded parts shown as (MIME) buttons. I am going to add "shar" and "binhex". When it is finished, I will mail it to you. What I did are 1. use gnus-article-display-hook 2. elisp native uudecode function (steal lots code from base64.el) 3. modify mm-decode-content-transfer-encoding so that MIME button can invoke uudecode. The following codes are the modified version. Any suggestion? (defun mm-decode-content-transfer-encoding (encoding) (cond ((eq encoding 'quoted-printable) (quoted-printable-decode-region (point-min) (point-max))) ((eq encoding 'base64) (condition-case () (base64-decode-region (point-min) (point-max)) (error nil))) ((memq encoding '(7bit 8bit binary)) ) ((null encoding) ) ((fboundp encoding) ;;; modified (funcall encoding (point-min) (point-max))) ;;; modified (t (error "Can't decode encoding %s" encoding)))) -- Shenghuo ---------------------------------------------------------------- diff -ru pgnus-0.31/lisp/ChangeLog pgnus-0.32pre/lisp/ChangeLog --- pgnus-0.31/lisp/ChangeLog Mon Sep 14 12:55:34 1998 +++ pgnus-0.32pre/lisp/ChangeLog Sun Sep 20 00:28:58 1998 @@ -1,3 +1,8 @@ +Sun Sep 20 00:27:55 1998 ZHU Shenghuo + + * gnus-art.el (gnus-mime-inline-part): remove part if necessary + + Mon Sep 14 18:55:38 1998 Lars Magne Ingebrigtsen * gnus.el: Pterodactyl Gnus v0.31 is released. diff -ru pgnus-0.31/lisp/gnus-art.el pgnus-0.32pre/lisp/gnus-art.el --- pgnus-0.31/lisp/gnus-art.el Mon Sep 14 12:55:35 1998 +++ pgnus-0.32pre/lisp/gnus-art.el Sun Sep 20 00:29:39 1998 @@ -2199,9 +2199,11 @@ (contents (mm-get-part data)) (b (point)) buffer-read-only) - (forward-line 2) - (mm-insert-inline data contents) - (goto-char b))) + (if (mm-handle-undisplayer data) + (mm-remove-part data) + (forward-line 2) + (mm-insert-inline data contents) + (goto-char b)))) (defun gnus-insert-mime-button (handle) (let ((gnus-tmp-name (mail-content-type-get (mm-handle-type handle) 'name))