[ic] 5.5.0 errors - bugs?

[Kevin Walsh]

Peter <peter at pajamian.dhs.org> wrote:
> Index: code/UI_Tag/version.coretag
> ===================================================================
> RCS file: /var/cvs/interchange/code/UI_Tag/version.coretag,v
> retrieving revision 1.12
> diff -u -p -r1.12 version.coretag
> --- code/UI_Tag/version.coretag	8 Nov 2005 18:14:40 -0000	1.12
> +++ code/UI_Tag/version.coretag	31 Oct 2006 01:26:11 -0000
> @@ -22,8 +22,10 @@ sub {
>  	}
> 
>  	if($opt->{local_error}) {
> -		my $fn = $Vend::Cfg->{ErrorFile};
> -		push @out, $Tag->page("$::Variable->{UI_BASE}/do_view", $fn) . "$fn</a>";
> +		my $dfn = my $fn = $Vend::Cfg->{ErrorFile};
> +		my $pre = $Global::Catalog{$Vend::Cat}->{dir} . '/';
> +		$fn =~ s:^\Q$pre\E::;
> +		push @out, $Tag->page("$::Variable->{UI_BASE}/do_view", $fn) .
> "$dfn</a>";
>  		$done_something = 1;
>  	}
> 
Hello Peter.

If you commit that patch (and I think you should) can you change
$Tag->page() to $Tag->area().

    my $href = $Tag->area("$::Variable->{UI_BASE}/do_view",$fn);
    push(@out,"<a href="$href">$dfn</a>");

I just can't stand [page] and think it should slowly (or quickly) fade
into oblivion. :-)

-- 
   _/   _/  _/_/_/_/  _/    _/  _/_/_/  _/    _/
  _/_/_/   _/_/      _/    _/    _/    _/_/  _/   K e v i n   W a l s h
 _/ _/    _/          _/ _/     _/    _/  _/_/    kevin at cursor.biz
_/   _/  _/_/_/_/      _/    _/_/_/  _/    _/