[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] Better links to usenet articles
|
From: |
Tassilo Horn |
|
Subject: |
Re: [Orgmode] Better links to usenet articles |
|
Date: |
Fri, 14 Nov 2008 10:09:08 +0100 |
|
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) |
Tassilo Horn <address@hidden> writes:
Ups, please correct that one line.
> --8<---------------cut here---------------start------------->8---
> (with-current-buffer gnus-article-buffer
> (save-excursion
> (gnus-summary-toggle-header 1)
^^^
> (goto-char (point-min))
> (let ((str (mail-header 'x-no-archive (mail-header-extract))))
> (when str
> (with-temp-buffer
> (insert str)
> (buffer-substring-no-properties (point-min) (point-max)))))))
> --8<---------------cut here---------------end--------------->8---
Bye,
Tassilo