change doubble quote syntax

This commit is contained in:
Marko Oldenburg 2021-04-23 05:15:31 +02:00
parent 8414fce32c
commit 0f1635b36c
2 changed files with 5 additions and 5 deletions

View File

@ -1 +1 @@
UPD 2021-04-23_02:41:23 5969 lib/FHEM/Core/Authentication/Passwords.pm
UPD 2021-04-23_05:15:17 5969 lib/FHEM/Core/Authentication/Passwords.pm

View File

@ -72,7 +72,7 @@ sub new {
sub setStorePassword {
my $self = shift;
my $name = shift;
my $password = shift // return(undef,q{no password given});
my $password = shift // return(undef,q(no password given));
my $index = $self->{TYPE} . '_' . $name . '_passkey';
my ($x,$y) = ::gettimeofday();
@ -122,14 +122,14 @@ sub getReadPassword {
my $index = $self->{TYPE} . '_' . $name . '_passkey';
my ( $password, $err, $salt );
::Log3($name, 4, qq{password Keystore handle for Device ($name) - Read password from file});
::Log3($name, 4, qq(password Keystore handle for Device ($name) - Read password from file));
( $err, $password ) = ::getKeyValue($index);
if ( defined($err) ) {
::Log3($name, 1,
qq{password Keystore handle for Device ($name) - unable to read password from file: $err});
qq(password Keystore handle for Device ($name) - unable to read password from file: $err));
return undef;
}
@ -161,7 +161,7 @@ qq{password Keystore handle for Device ($name) - unable to read password from fi
}
else {
::Log3($name, 1, qq{password Keystore handle for Device ($name) - No password in file});
::Log3($name, 1, qq(password Keystore handle for Device ($name) - No password in file));
return undef;
}
}