From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/34532
Path: main.gmane.org!not-for-mail
From: ShengHuo ZHU <zsh@cs.rochester.edu>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: MML preview should have a "quit" function
Date: 02 Feb 2001 13:58:18 -0500
Sender: owner-ding@hpc.uh.edu
Message-ID: <5b1ytglxo5.fsf@avocet.cs.rochester.edu>
References: <vxk4ryddkro.fsf@cinnamon.vanillaknot.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035170442 30912 80.91.224.250 (21 Oct 2002 03:20:42 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 03:20:42 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from karazm.math.uh.edu (karazm.math.uh.edu [129.7.128.1])
	by mailhost.sclp.com (Postfix) with ESMTP id 52321D049D
	for <jason@mastaler.com>; Fri,  2 Feb 2001 14:00:04 -0500 (EST)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by karazm.math.uh.edu (8.9.3/8.9.3) with ESMTP id MAC11967;
	Fri, 2 Feb 2001 12:58:37 -0600 (CST)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 02 Feb 2001 12:58:00 -0600 (CST)
Original-Received: from mailhost.sclp.com (postfix@66-209.196.61.interliant.com [209.196.61.66] (may be forged))
	by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id MAA06994
	for <ding@hpc.uh.edu>; Fri, 2 Feb 2001 12:57:50 -0600 (CST)
Original-Received: from gate.cs.rochester.edu (gate.cs.rochester.edu [192.5.53.207])
	by mailhost.sclp.com (Postfix) with ESMTP id 790A9D049D
	for <ding@gnus.org>; Fri,  2 Feb 2001 13:58:19 -0500 (EST)
Original-Received: from avocet.cs.rochester.edu (avocet.cs.rochester.edu [192.5.53.22]) by gate.cs.rochester.edu (8.9.1b+Sun/U) with ESMTP id NAA09261 for <ding@gnus.org>; Fri, 2 Feb 2001 13:58:18 -0500 (EST)
Original-Received: (from zsh@localhost) by avocet.cs.rochester.edu (8.9.1b+Sun/Q++) id NAA00890; Fri, 2 Feb 2001 13:58:18 -0500 (EST)
Original-To: ding@gnus.org
X-Attribution: ZSH
X-Face: 'IF:e51ib'Qbl^(}l^&4-J`'P!@[4~O|&k#:@Gld#b/]oMq&`&FVY._3+b`mzp~Jeve~/#/
 ERD!OTe<86UhyN=l`mrPY)M7_}`Ktt\K+58Z!hu7>qU,i.N7TotU[FYE(f1;}`g2xj!u*l`^&=Q!g{
 *q|<EDbQtg9{wfQuI,#r#{'A,\!95my:/,]"s,O4nzqxNL.}WrHA>ddto|nkt"$r,K$[)"|6,elPH=
 GJ6Q
In-Reply-To: <vxk4ryddkro.fsf@cinnamon.vanillaknot.com> (Karl Kleinpaste's message of "02 Feb 2001 13:04:11 -0500")
User-Agent: Gnus/5.090001 (Oort Gnus v0.01) Emacs/20.7
Precedence: list
X-Majordomo: 1.94.jlt7
Original-Lines: 23
Xref: main.gmane.org gmane.emacs.gnus.general:34532
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:34532

Karl Kleinpaste <karl@charcoal.com> writes:

> MML preview buffers are in fundamental mode, with neither keybindings
> nor menus.  It should understand at least a `q' to quit.
> 
> 
> --- mml.el.~1~	Tue Jan 23 09:12:11 2001
> +++ mml.el	Fri Feb  2 13:02:26 2001
> @@ -891,6 +891,7 @@
>  	  (gnus-article-prepare-display))))
>      (fundamental-mode)
>      (setq buffer-read-only t)
> +    (local-set-key "q" '(lambda () (interactive) (kill-buffer nil)))
>      (goto-char (point-min))))
>  
>  (defun mml-validate ()

Committed. BTW, I removed the quote before the lambda.

ShengHuo

-- 
(setq gnus-posting-styles '((".*" (signature-file "~/.signature"))))