validator/httpd/cgi-bin check,1.642,1.643

Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv11521/httpd/cgi-bin

Modified Files:
	check 
Log Message:
Make Encode::JIS2K optional.

Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.642
retrieving revision 1.643
diff -u -d -r1.642 -r1.643
--- check	3 Feb 2009 00:43:36 -0000	1.642
+++ check	4 Feb 2009 20:01:39 -0000	1.643
@@ -52,7 +52,6 @@
 use Encode::Alias             qw();
 use Encode::HanExtra          qw(); # for some chinese character encodings,
                                     # e.g gb18030
-use Encode::JIS2K             qw(); # ditto extra japanese encodings
 use File::Spec::Functions     qw(catfile);
 use HTML::Encoding       0.52 qw();
 use HTML::Parser         3.24 qw(); # Need 3.24 for $p->parse($code_ref)
@@ -223,7 +222,10 @@
   };
 $RSRC = \%rsrc;
 
-
+eval {
+  local $SIG{__DIE__};
+  require Encode::JIS2K; # for optional extra Japanese encodings
+};
 
 } # end of BEGIN block.
 

Received on Wednesday, 4 February 2009 20:01:51 UTC