Fix warning (#2538)
This commit is contained in:
parent
03f63877d8
commit
469d2a40aa
|
@ -26,7 +26,7 @@ has multiValuesSeparator => ( is => 'rw', isa => 'Maybe[Str]' );
|
|||
has jail => ( is => 'rw' );
|
||||
has error => ( is => 'rw' );
|
||||
|
||||
our $VERSION = '2.0.11';
|
||||
our $VERSION = '2.0.12';
|
||||
our @builtCustomFunctions;
|
||||
|
||||
## @imethod protected build_jail()
|
||||
|
@ -122,7 +122,7 @@ sub encrypt {
|
|||
}
|
||||
|
||||
sub token {
|
||||
return encrypt( join( ':', time, @_ ) );
|
||||
return $_[0] ? encrypt( join( ':', time, @_ ) ) : encrypt(time);
|
||||
}
|
||||
|
||||
## @method reval
|
||||
|
|
|
@ -12,7 +12,7 @@ BEGIN {
|
|||
}
|
||||
|
||||
my $maintests = 22;
|
||||
my $debug = 'debug';
|
||||
my $debug = 'error';
|
||||
my ( $issuer, $sp, $res );
|
||||
|
||||
# Redefine LWP methods for tests
|
||||
|
|
Loading…
Reference in New Issue
Block a user