From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/12553
Path: main.gmane.org!not-for-mail
From: Lars Balker Rasmussen <lbr@mjolner.dk>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: Filling articles
Date: 08 Oct 1997 18:39:34 +0200
Message-ID: <0fiuv8gqex.fsf@frey.mjolner.dk>
References: <0fhgas8cnw.fsf@heimdal.mjolner.dk>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
X-Trace: main.gmane.org 1035152069 4404 80.91.224.250 (20 Oct 2002 22:14:29 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 22:14:29 +0000 (UTC)
Return-Path: <ding-request@ifi.uio.no>
Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16])
	by altair.xemacs.org (8.8.7/8.8.7) with ESMTP id KAA17170
	for <steve@altair.xemacs.org>; Wed, 8 Oct 1997 10:36:10 -0700
Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2])
	by xemacs.org (8.8.5/8.8.5) with SMTP id MAA01002
	for <steve@xemacs.org>; Wed, 8 Oct 1997 12:28:45 -0500 (CDT)
Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) 
	id <SAA12875@ifi.uio.no> for <ding@ifi.uio.no> ; Wed, 8 Oct 1997 18:39:44 +0200
Original-Received: (qmail 18324 invoked by uid 504); 8 Oct 1997 16:39:38 -0000
Original-Received: (qmail 18321 invoked from network); 8 Oct 1997 16:39:37 -0000
Original-Received: from frey.mjolner.dk (130.225.8.218)
  by claymore.vcinet.com with SMTP; 8 Oct 1997 16:39:36 -0000
Original-Received: (from lbr@localhost) by frey.mjolner.dk (8.7.6/8.7.3) id SAA03985; Wed, 8 Oct 1997 18:39:34 +0200 (MET DST)
Original-To: ding@gnus.org
Original-Lines: 20
X-Mailer: Gnus v5.5/Emacs 20.2
Xref: main.gmane.org gmane.emacs.gnus.general:12553
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:12553

I wrote:
> So, WIBNI if you could type M-q in the article buffer, and that would
> act like M-q would in a text-buffer?

Aw heck, I wasn't working anyway:

(defun my-gnus-article-fill-paragraph (arg)
  "Fill paragraph in gnus article buffer.  
Works exactly the same as `fill-paragraph'"
  (interactive (list (if current-prefix-arg 'full)))
  (save-excursion
    (set-buffer gnus-article-buffer)
    (let ((buffer-read-only nil))
      (fill-paragraph arg))))
(define-key gnus-article-mode-map "\M-q" 'my-gnus-article-fill-paragraph)

Any of you lisp-gurus see a problem with that?
-- 
Lars Balker Rasmussen, Software Engineer, Mjolner Informatics ApS
lbr@mjolner.dk