From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/36908
Path: main.gmane.org!not-for-mail
From: Christoph Conrad <cc@cli.de>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: Getting the URL from a nnrss-Message
Date: Fri, 13 Jul 2001 19:40:39 +0200
Organization: Church of GNU Emacs
Message-ID: <u4rsgd8x4.fsf@cli.de>
References: <ud77qkxhl.fsf@cli.de> <2nn16ajcjw.fsf@piglet.jia.vnet>
Reply-To: christoph.conrad@gmx.de
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035172415 11073 80.91.224.250 (21 Oct 2002 03:53:35 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 03:53:35 +0000 (UTC)
Cc: ding@gnus.org, christoph.conrad@gmx.de
Return-Path: <cc@cli.de>
Return-Path: <cc@cli.de>
Original-Received: (qmail 27358 invoked from network); 13 Jul 2001 17:40:53 -0000
Original-Received: from gate.cli.de (212.117.64.114)
  by gnus.org with SMTP; 13 Jul 2001 17:40:53 -0000
Original-Received: from cli3.cli.de (cli3.cli.de [10.13.11.3])
	by gate.cli.de (8.9.3/8.9.3) with ESMTP id TAA05367;
	Fri, 13 Jul 2001 19:40:39 +0200
Original-Received: from CLI119 (cli119.cli.de [10.13.23.119])
	by cli3.cli.de (8.9.3/8.9.3) with ESMTP id TAA23667;
	Fri, 13 Jul 2001 19:40:39 +0200
Original-To: ShengHuo ZHU <zsh@cs.rochester.edu>
X-Public-Key: http://pgp5.ai.mit.edu:11371/pks/lookup?op=get&search=0x5FCAAE45
In-Reply-To: <2nn16ajcjw.fsf@piglet.jia.vnet> (ShengHuo ZHU's message of
 "Thu, 12 Jul 2001 10:13:23 -0700")
User-Agent: Gnus/5.090004 (Oort Gnus v0.04) Emacs/21.0.103
Original-Lines: 42
Xref: main.gmane.org gmane.emacs.gnus.general:36908
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:36908

Hello ShengHuo,

you wrote:

    ZSH> I've added nnrss-url-field for the url.

For those who want to use it for opening an nnrss url directly from
the summary buffer i supply some code here. Is there a better way to
define the key locally to the group? Maybe with group parameters?

======================================================================
CUT HERE - CUT HERE - CUT HERE - CUT HERE - CUT HERE - CUT HERE - CUT
======================================================================
(require 'browse-url)

(defun browse-nnrss-url( arg )
  (interactive "p")
  (let ((url (assq nnrss-url-field
                   (mail-header-extra
                    (gnus-data-header
                     (assq (gnus-summary-article-number)
                           gnus-newsgroup-data))))))
    (if url
        (browse-url (cdr url))
      (gnus-summary-scroll-up arg))))

(eval-after-load "gnus"
  #'(define-key gnus-summary-mode-map
      (kbd "<RET>") 'browse-nnrss-url))

(add-to-list 'nnmail-extra-headers nnrss-url-field)
======================================================================
CUT HERE - CUT HERE - CUT HERE - CUT HERE - CUT HERE - CUT HERE - CUT
======================================================================

Best regards,
Christoph Conrad
-- 
TTi Entwicklungszentrum GmbH,  Elisabethstr. 16, D-52062 Aachen
Fon: +49 241 47051-0  Fax: +49 241 47051-89 Web: http://www.cli.de
Look Ma, this man can twist his fingers as if they were made of rubber,
isn't that amazing? -- Not really, he's been using emacs for years...!