Re: [MacPerl-Toolbox] [Macperl-Toolbox] status window?

> >Or, you could use this code I happen to have:
> >
> >use constant WINV => 16;
> >use vars qw($MonWin $MonPort $MonWid);
> >...
> 
> This doesn't compile. You never use'd any external modules? That is: I
> don't see any other "use" lines, than the above?

Oops, trimmed them off.

use Mac::Windows qw(SizeWindow GrowWindow floatGrowProc TrackGoAway);
use Mac::QuickDraw qw(SetPort MoveTo DrawString EraseRect TextSize);
use Mac::Events qw(WaitNextEvent);

As with any GUI MacPerl application, you must call WaitNextEvent()
periodically.

-- 
Kevin Reid