emacs-orgmode
[Top][All Lists]
Advanced

[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:03:37 +0100
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux)

Carsten Dominik <address@hidden> writes:

Hi Carsten,

> Does anyone know the magic spell to check for this header field in a
> gnus article?

That works for me:

--8<---------------cut here---------------start------------->8---
(with-current-buffer gnus-article-buffer
  (save-excursion
    (gnus-summary-toggle-header)
    (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---

It returns the value of that header as string or nil if there's no such
header at all.

Bye,
Tassilo
-- 
The glass is neither half-full nor half-empty: it's twice as big as it
needs to be.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]