package t::Constants;
##################################################################
# some backend-specific constants that must be
# set before those backends can be used for
# testing. See the variable assignments at the
# bottom of this file and change them if you want
# to run tests with those backends.
##################################################################
sub skip_remaining_tests {
warn q@
*******************************************************
*** live translation tests not configured! ***
*******************************************************
* *
* If you want to enable live translation tests for *
* the Google and Microsoft backends, edit the *
* variable definitions at the bottom of the file *
* *
* t/Constants.pm *
* *
* Also, set $t::Constants::CONFIGURED to 1 *
* instead of 0 . *
*******************************************************
@;
Test::More::done_testing();
exit;
}
# consistent, DRY configuration to use for most tests
sub basic_config {
I22r::Translate->config(
'I22r::Translate::Google' => {
ENABLED => 1,
API_KEY => $t::Constants::GOOGLE_API_KEY,
REFERER => 'http://just.doing.some.testing/',
@_ } );
}
# t/Constants.pmx is a separate file, not included in
# the released distribution, that contains my personal
# API keys for testing and development.
if (-f "t/Constants.pmx" && !$ENV{RELEASE}) {
# t/Constants.pmx is a file, not included with the I22r-Translate
# distribution, that resides on the author's system and contains
# his Google and Microsoft credentials.
require "t/Constants.pmx";
} else {
$t::Constants::GOOGLE_API_KEY = "get_a_Google_API_key_and_set_this_value";
$t::Constants::CONFIGURED = 0;
}
1;