delete-emails.r extension

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

On Sat, 27 Sep 2003 17:56:54 +0200, Robert M. ünch <[robert--muench--robertmuench--de]> wrote:

> select-by-filter: does [ > foreach m b-msg [ > show f-em > ]