Check for JSON::PP since Perl doesn't do it at compile-time, instead it fatals when needed.

This commit is contained in:
Elijah Perrault committed 2011-02-05 18:05:42 -07:00
1 parent ff35cc9957
commit 160dfcd2b1
1 file changed
+7 -2
+7 -2
View File
@@ -13,6 +13,11 @@ use JSON -support_by_pp;
# Initialization subroutine.
sub _init
{
# Check for JSON::PP.
eval {
require JSON::PP;
1;
} or return 0;
# Create the CALC command.
cmd_add("CALC", 0, 0, \%m_Calc::HELP_CALC, \&m_Calc::calc) or return 0;
@@ -115,8 +120,8 @@ Google Calculator.
=over
This module requires LWP::UserAgent, URI::Escape and JSON. All are
obtainable from the CPAN <http://www.cpan.org>.
This module requires LWP::UserAgent, URI::Escape and JSON/JSON::PP.
All are obtainable from the CPAN <http://www.cpan.org>.
This module is compatible with Auto version 3.0.0a2+.