Announcements and discussions for Gnus, the GNU Emacs Usenet newsreader
 help / color / mirror / Atom feed
* Less strict regexp in gnus-outlook...
@ 2003-03-18 18:33 Svend Tollak Munkejord
  2003-03-22 14:27 ` Lars Magne Ingebrigtsen
  0 siblings, 1 reply; 3+ messages in thread
From: Svend Tollak Munkejord @ 2003-03-18 18:33 UTC (permalink / raw)


Hi,

I use ognus-0.16 and find the Outlook deuglify function `W Y f' really
great, and I use it (almost) every day. However, it fails on some
particularly ugly e-mails:

1. There may be a space after the "Original Message" line:

----- Original Message ----- 
...

2. The "Original Message" line does not always have four consecutive
   hyphens:

-- Messaggio originale --

I fixed this in a simpleminded way by changing the regexp in
gnus-outlook-repair-attribution-block from

(defun gnus-outlook-repair-attribution-block ()
  "Repair a big broken attribution block."
  (save-excursion
    (let ((case-fold-search nil)
	  (inhibit-read-only t)
	  (cite-marks gnus-outlook-deuglify-cite-marks))
      (gnus-with-article-buffer
	(article-goto-body)
	(if (re-search-forward
	     (concat "^[" cite-marks " \t]*----* ?[^-]+ [^-]+ ?----*\n"
		     "[^\n:]+:[ \t]*\\([^\n]+\\)\n"
		     "\\([^\n:]+:[ \t]*[^\n]+\n\\)+")
	     nil t)
	    (progn
	      (gnus-kill-all-overlays)
	      (replace-match "\\1 wrote:\n")
	      (match-beginning 0)))))))


to 

...
	     (concat "^[" cite-marks " \t]*--* ?[^-]+ [^-]+ ?--*\\s *\n"
		     "[^\n:]+:[ \t]*\\([^\n]+\\)\n"
		     "\\([^\n:]+:[ \t]*[^\n]+\n\\)+")
...

Regards,
-- 
Svend Tollak Munkejord 


^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: Less strict regexp in gnus-outlook...
  2003-03-18 18:33 Less strict regexp in gnus-outlook Svend Tollak Munkejord
@ 2003-03-22 14:27 ` Lars Magne Ingebrigtsen
       [not found]   ` <hdd65qbdzpg.fsf@bacchus.pvv.ntnu.no>
  0 siblings, 1 reply; 3+ messages in thread
From: Lars Magne Ingebrigtsen @ 2003-03-22 14:27 UTC (permalink / raw)


Svend Tollak Munkejord <stm@bacchus.pvv.org> writes:

> I fixed this in a simpleminded way by changing the regexp in
> gnus-outlook-repair-attribution-block from

Could you send a patch?  "diff -u old-version new-version".

-- 
(domestic pets only, the antidote for overdose, milk.)
   larsi@gnus.org * Lars Magne Ingebrigtsen


^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: Less strict regexp in gnus-outlook...
       [not found]   ` <hdd65qbdzpg.fsf@bacchus.pvv.ntnu.no>
@ 2003-03-22 18:29     ` Lars Magne Ingebrigtsen
  0 siblings, 0 replies; 3+ messages in thread
From: Lars Magne Ingebrigtsen @ 2003-03-22 18:29 UTC (permalink / raw)


Svend Tollak Munkejord <stm@bacchus.pvv.org> writes:

> I had only put it in my .gnus, but this is what it would be:

Thanks for the patch; I've applied it to Oort Gnus v0.17 (i. e., CVS).

-- 
(domestic pets only, the antidote for overdose, milk.)
   larsi@gnus.org * Lars Magne Ingebrigtsen


^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2003-03-22 18:29 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2003-03-18 18:33 Less strict regexp in gnus-outlook Svend Tollak Munkejord
2003-03-22 14:27 ` Lars Magne Ingebrigtsen
     [not found]   ` <hdd65qbdzpg.fsf@bacchus.pvv.ntnu.no>
2003-03-22 18:29     ` Lars Magne Ingebrigtsen

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).