<<< Date Index >>>     <<< Thread Index >>>

Re: Archive of color themes



so spake Asif Iqbal [2004.08.24 @ 23:04]:
> Hi All
> 
> Is there a cool list of links or archive where I can look for some color 
> themes?
> 
> Thanks
here, i call this theme random... heehee.  :)
----------------------------------
#!/usr/bin/perl
#wasting time before bed....
map { push @cols,"color$_" } (0..8);
@objects=('attachment','bold','hdrdefault','body','indicator','markers',
    'message','normal','quoted','quoted1','quoted2','quoted3','quoted4',
    'search','signature','status','tilde','tree','underline');
@hdrs=('From','Subject','To','Cc','Bcc');
sub rnd {return $cols[int(rand($#cols))]}
for(@objects) { print "color $_ ".&rnd.' '.&rnd; print(' "."') if /body/; print 
';'}
for(@hdrs){ print "color header ".&rnd.' '.&rnd." ^$_;";}
----------------------------------
now a :`filename` will give you a random look.  ah...i love perl.
-- 
 *------------------------*
//  ste\/e || 0x44288D05 //
*------------------------*

Attachment: pgpwDdusm6ejj.pgp
Description: PGP signature