hey all
i was beating my hed against this
& i thought i should post
all these modules load up and work fine
if i use the old location directive way
but thats tedious!
i thought
hey use the perl directive!
fine it works great
but i couldn't fiqure out why
all the modules would load but not the
viewmembers one
finally i figured out
if i changed view to viewzine it worked great
it could go past and get viewmember!!
what could be causing this?
my guess is there is some sort of wierd
regex prob or i am just missing something
<Perl>
#array has
#filename,directory,Module
my @modules=(
['login','','Login'],
['editzine','level1/','EditZine'],
['search','level2/','Search'],
['cats','level2/','Category'],
['viewzine','level2/','ViewZine'],
['register','','Register'],
['viewmember','level2/','ViewMember']
);
#go through em
foreach (@modules){
#make the location
my $dir = $_->[1] ne '' ? $EZS::Global::dir.$_->[1]:'/';
#set location to module
$Location{$dir.$_->[0]}={
SetHandler =>'perl-script',
PerlHandler =>'EZS::'.$_->[2]
};
}
</Perl>
