Re: function to access raw article

[Alexander Baier <alexander.baier@mailbox.org>]

On 2014-10-31 09:53 Igor Sosa Mayor wrote:
> Alexander Baier <alexander.baier@mailbox.org> writes:
>
>> Hello,
>>
>> I want to access the raw (unwashed) version of an article from emacs
>> lisp to search for a regexp. I do this in order to extract information
>> from the body of the article to be used in the summary line. I used
>> `gnus-summary-show-raw-article' which did not seem to work. What is the
>> preferred way of doing this?
>
> I think gnus-summary-show-raw-article should work...
>
> But in any way, I don't think this is necessary to get the summary line
> (do you mean 'subject')? What do you want to achieve exactly?

I have information in the body of the the article that I want to display
in the summary line. To do this, I wrote a function
gnus-user-format-function-Y that extracts said information from the
body. I then include %uY in my gnus-summary-line-format to include the
information in the summary line. My current function looks like this:

#+BEGIN_SRC emacs-lisp
  (defun gnus-user-format-function-Y (header)
    "Returns the title of a youtube video."
    (with-current-buffer gnus-article-buffer
      (gnus-summary-show-raw-article)
      (gnus-summary-select-article-buffer)
      (goto-char (point-min))
      (search-forward-regexp "\n.*just uploaded a video\n\\(.*\\)\nhttp:.*")
      (match-string-no-properties 1)))
#+END_SRC

If I enter a group with this function specified in the
sumary-line-format I get the following messages in the *Messages* buffer:

Error updating the summary line
Can't find article 832 [2 times]

Furthermore gnus displays
"Hiding all threads... <some fast growing number>" in the echo area and
hangs. When I press C-g I see a garbled summary buffer.

Regards,
-- 
Alexander Baier