From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/81483 Path: news.gmane.org!not-for-mail From: Reiner Steib Newsgroups: gmane.emacs.gnus.general Subject: Re: Does nnweb with Google work any more? Date: Sat, 25 Feb 2012 17:44:19 +0100 Message-ID: <87fwdy3lss.fsf@marauder.physik.uni-ulm.de> References: Reply-To: Reiner Steib NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: dough.gmane.org 1330188399 23957 80.91.229.3 (25 Feb 2012 16:46:39 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sat, 25 Feb 2012 16:46:39 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M29763@lists.math.uh.edu Sat Feb 25 17:46:37 2012 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1S1KlX-0001Mj-EG for ding-account@gmane.org; Sat, 25 Feb 2012 17:46:35 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1S1Kk8-0002bS-SX; Sat, 25 Feb 2012 10:45:08 -0600 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1S1Kk7-0002bH-15 for ding@lists.math.uh.edu; Sat, 25 Feb 2012 10:45:07 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.76) (envelope-from ) id 1S1Kk4-0007Fe-Pt for ding@lists.math.uh.edu; Sat, 25 Feb 2012 10:45:06 -0600 Original-Received: from plane.gmane.org ([80.91.229.3]) by quimby.gnus.org with esmtp (Exim 4.72) (envelope-from ) id 1S1Kk2-0002h8-Pn for ding@gnus.org; Sat, 25 Feb 2012 17:45:02 +0100 Original-Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1S1Kk1-0000DF-LK for ding@gnus.org; Sat, 25 Feb 2012 17:45:01 +0100 Original-Received: from p57946e3d.dip.t-dialin.net ([87.148.110.61]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 25 Feb 2012 17:45:01 +0100 Original-Received: from Reiner.Steib by p57946e3d.dip.t-dialin.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 25 Feb 2012 17:45:01 +0100 X-Injected-Via-Gmane: http://gmane.org/ Mail-Followup-To: ding@gnus.org Original-Lines: 85 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: p57946e3d.dip.t-dialin.net X-Face: /U7=m^"/-Dn61mAl{g9e3>\G5Tp,oEX|V)g2I1hBk\ML;)7A?6cmB-y7y?'NA^J<=oz7syB =(McAwIHgLX!.B?R3X}98d@?>CrT094KLWh]WU4gDpnL/")MS(XoQTv`Oq225uL>+;CpPXo$N5e>N> $tPd-gbB^F{gQS#1ase]XO~D4p4M"3+F-7~u]dy3I?Pb8RO*H-EFeWDUf?Rf,d]pv\Jvh2Cht!A=im yKAS2Z%Ao^;}W/qzMvMm Mail-Copies-To: nobody User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1 (gnu/linux) Cancel-Lock: sha1:7w5kuw/AcisSsEHGYxGyH1DxKEw= X-Spam-Score: -0.9 (/) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:81483 Archived-At: --=-=-= On Sat, Feb 25 2012, Lars Magne Ingebrigtsen wrote: > Has the Google Groups thing where you could request stuff from > > http://www.google.com/groups?as_umsgid=%s&hl=en&dmode=source > > totally gone away now? I can't get it to work, at least... I have a modified version of nnweb.el which supports MID searching via http://howardk.freenix.org/ (which now redirects to http://al.howardknight.net/). The code was last modified and tested in 2010, so you might need to adjust it. And I am not sure if all hunks in the diff are relevant, because I didn't have enough spare time to bring my diffs from the old cvs to git. --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=rs-nnweb-howardknight.patch --- nnweb.el 2012-01-07 19:25:08.000000000 +0100 +++ nnweb.el 2010-01-16 13:31:22.000000000 +0100 @@ -70,6 +71,11 @@ (address . "http://groups.google.com/groups") (base . "http://groups.google.com") (identifier . nnweb-google-identity)) + (howardk + (id . "http://howardk.freenix.org/msgid.cgi?STYPE=msgid&MSGI=<%s>&GOOGLE=on") + (article . nnweb-howardk-wash-article) + (reference . identity) + (identifier . nnweb-howardk-identity)) (gmane (article . nnweb-gmane-wash-article) (id . "http://gmane.org/view.php?group=%s") @@ -296,7 +308,27 @@ ;;; groups.google.com ;;; +;; Updated for Google's changed interface 2008-11 (defun nnweb-google-wash-article () + (let ((case-fold-search t) url) + (goto-char (point-min)) + (if (or (re-search-forward "The requested message.*could not be found." + nil t) + (re-search-forward + (concat "href=\"\\(/group/[^/]+/msg/[[:alnum:]]+" + "\\?dmode=source\\)\">Show original") nil t)) + (setq url (format "%s%s&output=gplain" + (nnweb-definition 'base) (match-string 1))) + (gnus-message 3 "Requested article not found")) + (gnus-message 9 "URL: %s" url) + (erase-buffer) + (mm-with-unibyte-current-buffer + (mm-url-insert-file-contents url)) + (unless (re-search-forward "^Message-ID:") + (gnus-message 3 "Requested article not found") + (erase-buffer)))) + +(defun nnweb-howardk-wash-article () ;; We have Google's masked e-mail addresses here. :-/ (let ((case-fold-search t) (start-re "
[\r\n ]*")
@@ -305,6 +337,7 @@
     (if (save-excursion
 	  (or (re-search-forward "The requested message.*could not be found."
 				 nil t)
+	      (re-search-forward "Couldn't find article" nil t)
 	      (not (and (re-search-forward start-re nil t)
 			(re-search-forward end-re nil t)))))
 	;; FIXME: Don't know how to indicate "not found".

--=-=-=


Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/

--=-=-=--