[REBOL] delete-emails.r extension
From: robert::muench::robertmuench::de at: 27-Sep-2003 17:56
Hi, I have made an extension to the delte-emails.r script from Dide. I add
a new button to select by "filter".
+line 292 btn "By Filter" [select-by-filter]
Further I added the select-by-filter function:
select-by-filter: does [
foreach m b-msg [
foreach filter filters [
if any [
all [m/5 > 146000 m/5 < 160358] ; swen worm
; add your filter here
]
[append f-em/picked m/6]
]
]
show f-em
]
You can add custom filters if you want. Maybe a GUI system to enter
filters and than evaluate them dynamically is more comfortable but I just
need a quick solution to get rid of all those damnd worm messages. Works
quite well now.
--
Robert M. Münch
Management & IT Freelancer
Mobile: +49 (177) 245 2802
http://www.robertmuench.de