Mail Index


[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[ApacheGallery] Re: One line comments shown as $COMMENT in r218



On Wed, Oct 22, 2003 at 12:28:04AM +0200, Jesper Skriver wrote:
> Hi,
> 
> This patch fix a problem I've seen in r218 where one line comments gets
> shown as $COMMENT

Thanks - comitted as r219

http://svn.apachegallery.dk/snapshots/Apache-Gallery-r219.tar.gz

> 
> --- /usr/local/lib/perl5/site_perl/5.8.0/Apache/Gallery.pm.r218	Tue Oct 21 23:56:48 2003
> +++ /usr/local/lib/perl5/site_perl/5.8.0/Apache/Gallery.pm	Wed Oct 22 00:26:36 2003
> @@ -1086,7 +1086,6 @@
>   	$comment_ref->{TITLE} = undef;
>  	$comment_ref->{COMMENT} = '';
>  
> -	my $content = '';
>  	open(FH, $filename) or return $comment_ref;
>  	my $title = <FH>;
>  	if ($title =~ m/^TITLE: (.*)$/) {
> @@ -1095,9 +1094,10 @@
>  	else {
>  		$comment_ref->{COMMENT} = $title;
>  	}
> -	{
> -		local $/;
> -		$comment_ref->{COMMENT} .= <FH>;
> +
> +	while (<FH>) {
> +		chomp;
> +		$comment_ref->{COMMENT} .= $_;
>  	}
>  	close(FH);
>  
> 
> /Jesper
> 
> -- 
> Jesper Skriver, jesper(at)skriver(dot)dk  -  CCIE #5456
> 
> One Unix to rule them all, One Resolver to find them,
> One IP to bring them all and in the zone to bind them.
-- 
hestdesign.info - we put the hest in .com
_______________________________________________
users mailing list
users@xxxxxxxxxxxxxxxx
http://ufo.hestdesign.com/cgi-bin/mailman/listinfo/agusers