[AppWrap-cvs] AppWrap/Apache/AppWrap Counter.pm,1.8,1.9

[<pla...@us...>]

Update of /cvsroot/appwrap/AppWrap/Apache/AppWrap
In directory sc8-pr-cvs1:/tmp/cvs-serv2587

Modified Files:
	Counter.pm 
Log Message:
ignore backslash escapes in $config{rootdir}

Index: Counter.pm
===================================================================
RCS file: /cvsroot/appwrap/AppWrap/Apache/AppWrap/Counter.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** Counter.pm	22 Nov 2002 10:05:56 -0000	1.8
--- Counter.pm	7 Dec 2002 01:45:40 -0000	1.9
***************
*** 17,25 ****
  
  use vars qw($VERSION);
! $Apache::AppWrap::Counter::VERSION = '0.10';
  
! # 16 Nov 02. Don't record download on HEAD requests
! # 12 Nov 02. Don't call &write_stats on HEAD requests
! # 01 Jun 02. Migrated &write_stats from &Webify.
  
  sub handler {
--- 17,26 ----
  
  use vars qw($VERSION);
! $Apache::AppWrap::Counter::VERSION = '0.11';
  
! # 16Nov02. ignore backslash escapes in $config{rootdir}
! # 16Nov02. Don't record download on HEAD requests
! # 12Nov02. Don't call &write_stats on HEAD requests
! # 01Jun02. Migrated &write_stats from &Webify.
  
  sub handler {
***************
*** 40,44 ****
    # to avoid overwriting the %config value.
    my $includes = $config{includes};
!   $includes =~ s/^$config{rootdir}//;
    return DECLINED if $uri =~ $includes;
  
--- 41,45 ----
    # to avoid overwriting the %config value.
    my $includes = $config{includes};
!   $includes =~ s/^q{$config{rootdir}}//;
    return DECLINED if $uri =~ $includes;