W3C home > Mailing lists > Public > www-validator-cvs@w3.org > December 2009

perl/modules/W3C/LinkChecker/bin checklink,4.174,4.175

From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
Date: Wed, 16 Dec 2009 19:04:59 +0000
To: www-validator-cvs@w3.org
Message-Id: <E1NKzBD-00086E-8W@lionel-hutz.w3.org>
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv31118/bin

Modified Files:
	checklink 
Log Message:
Initialize "local" variables as suggested by perlcritic.

Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.174
retrieving revision 4.175
diff -u -d -r4.174 -r4.175
--- checklink	16 Dec 2009 19:02:32 -0000	4.174
+++ checklink	16 Dec 2009 19:04:57 -0000	4.175
@@ -292,7 +292,7 @@
 
   # Pull in mod_perl modules if applicable.
   eval {
-    local $SIG{__DIE__};
+    local $SIG{__DIE__} = undef;
     require Apache2::RequestUtil;
   } if MP2();
 
@@ -608,7 +608,7 @@
   # All Apache configurations don't set HTTP_AUTHORIZATION for CGI scripts.
   # If we're under mod_perl, there is a way around it...
   eval {
-    local $SIG{__DIE__};
+    local $SIG{__DIE__} = undef;
     my $auth = Apache2::RequestUtil->request()->headers_in()->{Authorization};
     $ENV{HTTP_AUTHORIZATION} = $auth if $auth;
   } if (MP2() && !$ENV{HTTP_AUTHORIZATION});
@@ -852,7 +852,7 @@
 sub ask_password ()
 {
   eval {
-    local $SIG{__DIE__};
+    local $SIG{__DIE__} = undef;
     require Term::ReadKey;
     Term::ReadKey->require_version(2.00);
     Term::ReadKey->import(qw(ReadMode));
@@ -1632,7 +1632,10 @@
 sub new
 {
   my $p = HTML::Parser::new(@_, api_version => 3);
-  eval { local $SIG{__DIE__}; $p->utf8_mode(1); };
+  eval {
+    local $SIG{__DIE__} = undef;
+    $p->utf8_mode(1);
+  };
 
   # Start tags
   $p->handler(start => 'start', 'self, tagname, attr, text, line');
Received on Wednesday, 16 December 2009 19:05:10 GMT

This archive was generated by hypermail 2.2.0+W3C-0.50 : Thursday, 26 April 2012 12:55:16 GMT