[ic] Default file in pages subdir
Kevin Walsh
interchange-users@icdevgroup.org
Thu Aug 1 19:48:01 2002
>
> UserTag isdir Order path
> UserTag isdir Routine <<EOR
> sub {
> my ($path) = @_;
> return -d $path;
> }
> EOR
>
> and then the following autoload:
>
>
> Autoload <<EOS
> [perl]
> $url = $Session->{last_url};
>
> if ($Tag->isdir({path =>
> "/home/icdemo.webmaint.net/interchange/pages/$url"})){
> $CGI->{mv_nextpage} = "$url/index.html";
> }
> [/perl]
> EOS
>
>
>
> Tested and working :-) see
> http://icdemo.webmaint.net/cgi-bin/foundation_demo/test/index.html
> http://icdemo.webmaint.net/cgi-bin/foundation_demo/test/
>
>
> Now.. if I just new how to remove the hard-coded path in the Autoload...
>
"$Config->{VendRoot}/pages/$url"
--
_/ _/ _/_/_/_/ _/ _/ _/_/_/ _/ _/
_/_/_/ _/_/ _/ _/ _/ _/_/ _/ K e v i n W a l s h
_/ _/ _/ _/ _/ _/ _/ _/_/ kevin@cursor.biz
_/ _/ _/_/_/_/ _/ _/_/_/ _/ _/