Unverified Commit 1d3f1350 authored by Gavin Brown's avatar Gavin Brown
Browse files

support --lang argument

parent 718b5b26
......@@ -21,6 +21,7 @@ GetOptions($opt,
'help',
'exec=s',
'insecure',
'lang=s',
);
my $handlers = {
......@@ -67,6 +68,7 @@ my $epp = Net::EPP::Simple->new(
'reconnect' => 0,
'verify' => ($opt->{'insecure'} ? undef : 1),
'ca_file' => Mozilla::CA::SSL_ca_file(),
'lang' => ($opt->{'lang'} ? $opt->{'lang'} : 'en'),
);
my $term = Term::ReadLine->new('pepper');
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment