perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Stas Bekman <s...@stason.org>
Subject Re: [mp2] Apache::Reload and touch files.
Date Thu, 08 May 2003 00:09:17 GMT
Dmitri Tikhonov wrote:
> This is a patch against Apache::Reload from 1.99_08:
> 
> --- Apache/Reload.pm.orig       Wed May  7 19:49:21 2003
> +++ Apache/Reload.pm    Wed May  7 19:49:24 2003
> @@ -62,7 +62,7 @@
>          $TouchTime = $touch_mtime;
>          my $sym = Apache->gensym;
>          open($sym, $TouchFile) || die "Can't open '$TouchFile': $!";
> -        $TouchModules = <$sym>;
> +        $TouchModules = (<$sym> || '');
>          chomp $TouchModules;
>      }

But this is not the code that we have in 1.99_09 (sorry I've missed the fact 
that you were talking about 1.99_08). Can you please try to install 1.99_09?

with this patch on top of it:

Index: lib/Apache/Reload.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/lib/Apache/Reload.pm,v
retrieving revision 1.9
diff -u -r1.9 Reload.pm
--- lib/Apache/Reload.pm        17 Feb 2003 09:39:54 -0000      1.9
+++ lib/Apache/Reload.pm        8 May 2003 00:08:37 -0000
@@ -72,7 +72,7 @@
          $TouchTime = $touch_mtime;
          open my $fh, $TouchFile or die "Can't open '$TouchFile': $!";
          $TouchModules = <$fh>;
-        chomp $TouchModules;
+        chomp $TouchModules if $TouchModules;
      }

      if (ref($o) && (lc($o->dir_config("ReloadAll") || 'on') eq 'on')) {



__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Mime
View raw message