org-gnus.el returns incorrect message subject in article mode

[finalpatch]

Hi group,

I found that running org-store-link inside a gnus article buffer gives
out incorrect message subject. This is because in gnus-article-mode the
gnus-summary-subject-string function returns the subject of the next
message instead of the current one. The following patch fixes this
problem for me.

--- c:\users\fengl\code\emacs\lisp\org\org-gnus.el      Tue Feb 24 09:05:12 2009
+++ c:\emacs\lisp\org\org-gnus.el       Fri Jun  5 11:02:31 2009
@@ -133,7 +133,9 @@
           (to (mail-header 'to header))
           (newsgroups (mail-header 'newsgroups header))
           (x-no-archive (mail-header 'x-no-archive header))
-          (subject (gnus-summary-subject-string))
+          (subject (if (eq major-mode 'gnus-article-mode)
+                    (message-fetch-field "subject")
+                  (gnus-summary-subject-string)))
           desc link)
       (org-store-link-props :type "gnus" :from from :subject subject
                            :message-id message-id :group group :to to)

-- 
finalpatch