devel #9
@@ -1,2 +1,2 @@
 | 
				
			|||||||
UPD 2021-04-20_21:40:31 6866 FHEM/46_TeslaPowerwall2AC.pm
 | 
					UPD 2021-04-20_21:40:31 6866 FHEM/46_TeslaPowerwall2AC.pm
 | 
				
			||||||
UPD 2021-04-20_21:50:19 30167 lib/FHEM/Tesla/Powerwall.pm
 | 
					UPD 2021-04-20_21:55:17 30201 lib/FHEM/Tesla/Powerwall.pm
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -1028,17 +1028,19 @@ sub DeletePassword {
 | 
				
			|||||||
sub Rename {
 | 
					sub Rename {
 | 
				
			||||||
    my $new     = shift;
 | 
					    my $new     = shift;
 | 
				
			||||||
    my $old     = shift;
 | 
					    my $old     = shift;
 | 
				
			||||||
 | 
					    
 | 
				
			||||||
 | 
					    my $hash    = $::defs{$new};
 | 
				
			||||||
 | 
					
 | 
				
			||||||
    my ($passResp,$passErr);
 | 
					    my ($passResp,$passErr);
 | 
				
			||||||
    ($passResp,$passErr) = $hash->{helper}->{passObj}->setRename($new,$old);
 | 
					    ($passResp,$passErr) = $hash->{helper}->{passObj}->setRename($new,$old);
 | 
				
			||||||
    
 | 
					    
 | 
				
			||||||
    ::Log3($name, 1,
 | 
					    ::Log3($new, 1,
 | 
				
			||||||
qq(TeslaPowerwall2AC \(${name}\) - error while change the password hash after rename - $passErr)
 | 
					qq(TeslaPowerwall2AC \(${new}\) - error while change the password hash after rename - $passErr)
 | 
				
			||||||
        if ( !defined($passResp)
 | 
					        if ( !defined($passResp)
 | 
				
			||||||
        and defined($passErr) );
 | 
					        and defined($passErr) );
 | 
				
			||||||
 | 
					
 | 
				
			||||||
    ::Log3($name, 1,
 | 
					    ::Log3($new, 1,
 | 
				
			||||||
qq(TeslaPowerwall2AC \(${name}\) - change password hash after rename successfully)
 | 
					qq(TeslaPowerwall2AC \(${new}\) - change password hash after rename successfully)
 | 
				
			||||||
        if ( defined($passResp)
 | 
					        if ( defined($passResp)
 | 
				
			||||||
        and !defined($passErr) );
 | 
					        and !defined($passErr) );
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user