You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl@perl.apache.org by DH <cr...@yahoo.com> on 2002/07/20 12:12:06 UTC
Apache::Status bugfix ( "::" doesn't play well in filenames)
sub noh_b_graph {
my $r = shift;
require B::Graph;
untie *STDOUT;
my $dir = $r->server_root_relative(
$r->dir_config("GraphDir") || "logs/b_graphs");
mkdir $dir, 0755 unless -d $dir;
(my $thing = $r->path_info) =~ s:^/::;
$thing =~ s{::}{-}g; # cause some OS's dont' allow :: in filenames
########################################## the line above you should add
########################################## the line before it is # 516
__________________________________________________
Do You Yahoo!?
Yahoo! Health - Feel better, live better
http://health.yahoo.com
Re: Apache::Status bugfix ( "::" doesn't play well in filenames)
Posted by Stas Bekman <st...@stason.org>.
thanks, but how about sending a patch using diff?
http://perl.apache.org/contribute/cvs_howto.html#Sending_Patches
> sub noh_b_graph {
> my $r = shift;
> require B::Graph;
>
> untie *STDOUT;
>
> my $dir = $r->server_root_relative(
> $r->dir_config("GraphDir") || "logs/b_graphs");
>
> mkdir $dir, 0755 unless -d $dir;
>
> (my $thing = $r->path_info) =~ s:^/::;
> $thing =~ s{::}{-}g; # cause some OS's dont' allow :: in filenames
>
> ########################################## the line above you should add
> ########################################## the line before it is # 516
>
> __________________________________________________
> Do You Yahoo!?
> Yahoo! Health - Feel better, live better
> http://health.yahoo.com
--
__________________________________________________________________
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