- From: Terje Bless <link@hutz.w3.org>
- Date: Mon, 10 May 2004 13:32:10 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv8742
Modified Files:
check
Log Message:
Whitespace police, reformat.
Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.327
retrieving revision 1.328
diff -u -d -r1.327 -r1.328
--- check 10 May 2004 01:41:52 -0000 1.327
+++ check 10 May 2004 13:32:07 -0000 1.328
@@ -263,15 +263,13 @@
###############################################################################
my $T = HTML::Template->new(
- filename =>
- File::Spec->catfile($CFG->{Template_Path}, 'result.tmpl'),
- die_on_bad_params => FALSE,
- );
+ filename => File::Spec->catfile($CFG->{Template_Path}, 'result.tmpl'),
+ die_on_bad_params => FALSE,
+);
my $E = HTML::Template->new(
- filename =>
- File::Spec->catfile($CFG->{Template_Path}, 'fatal-error.tmpl'),
- die_on_bad_params => FALSE,
- );
+ filename => File::Spec->catfile($CFG->{Template_Path}, 'fatal-error.tmpl'),
+ die_on_bad_params => FALSE,
+);
$T->param(cfg_home_page => $CFG->{Home_Page});
@@ -640,7 +638,7 @@
{name => 'SP_CHARSET_FIXED', value => &ent($ENV{SP_CHARSET_FIXED})},
{name => 'SP_ENCODING', value => &ent($ENV{SP_ENCODING})},
{name => 'SP_BCTF', value => &ent($ENV{SP_BCTF})},
- ],
+ ],
);
#FIXME: This needs a UI and testing!
@@ -1719,10 +1717,7 @@
substr $File->{Content}->[0], ($File->{BOM} ? 3 : 0); # remove BOM
for (@{$File->{Content}}) {
- push @source, {
- file_source_i => $line,
- file_source_line => ent $_,
- };
+ push @source, {file_source_i => $line, file_source_line => ent $_};
$line++;
}
return \@source;
Received on Monday, 10 May 2004 09:33:28 UTC