Check for JSON::PP since Perl doesn't do it at compile-time, instead it fatals when needed.
This commit is contained in:
1 parent
ff35cc9957
commit
160dfcd2b1
1 file changed
+7
-2
+7
-2
@@ -13,6 +13,11 @@ use JSON -support_by_pp;
|
|||||||
# Initialization subroutine.
|
# Initialization subroutine.
|
||||||
sub _init
|
sub _init
|
||||||
{
|
{
|
||||||
|
# Check for JSON::PP.
|
||||||
|
eval {
|
||||||
|
require JSON::PP;
|
||||||
|
1;
|
||||||
|
} or return 0;
|
||||||
# Create the CALC command.
|
# Create the CALC command.
|
||||||
cmd_add("CALC", 0, 0, \%m_Calc::HELP_CALC, \&m_Calc::calc) or return 0;
|
cmd_add("CALC", 0, 0, \%m_Calc::HELP_CALC, \&m_Calc::calc) or return 0;
|
||||||
|
|
||||||
@@ -115,8 +120,8 @@ Google Calculator.
|
|||||||
|
|
||||||
=over
|
=over
|
||||||
|
|
||||||
This module requires LWP::UserAgent, URI::Escape and JSON. All are
|
This module requires LWP::UserAgent, URI::Escape and JSON/JSON::PP.
|
||||||
obtainable from the CPAN <http://www.cpan.org>.
|
All are obtainable from the CPAN <http://www.cpan.org>.
|
||||||
|
|
||||||
This module is compatible with Auto version 3.0.0a2+.
|
This module is compatible with Auto version 3.0.0a2+.
|
||||||
|
|
||||||
|
|||||||
Reference in new issue
Block a user