[tpop3d-discuss] Re: bulletins - SOLVED!!

Chris Lightfoot chris at ex-parrot.com
Mon, 25 Aug 2003 19:02:12 +0100


On Mon, Aug 25, 2003 at 06:53:40PM +0200, Michal Czerwinski wrote:
> On Mon, Aug 25, 2003 at 03:49:01PM +0300, ODHIAMBO Washington wrote:
> 
> > 
> > 1. ADD use GDBM_File; at the top of your perl script
> > 
> > 2. Substitute:
> > 
> > my $r = "$req->{local_part}@$req->{domain}";
> > 
> > with 
> > 
> > my $r = $req->{local_part} . '@' . $req->{domain};
> > 
> > 3. Substitute
> > 
> > tie(%rr, 'GDBM_File', $recips, &GDBM_WRCREAT, 0600);
> > 
> > with
> > 
> > 
> > tie(%rr, 'GDBM_File', $recips, &GDBM_File::GDBM_WRCREAT, 0600);
> 
> Requesting changes update in CVS repository (if not made)

I've now put the script itself in as scripts/bulletins.

I'd welcome other bulletin script implementations.

-- 
``When I am right, I get angry. Churchill gets angry when he's wrong.
  So we were often angry at each other.'' (Charles De Gaulle)