diff --git a/fhem/FHEM/72_FRITZBOX.pm b/fhem/FHEM/72_FRITZBOX.pm
index 0c0f74de5..e11a62531 100644
--- a/fhem/FHEM/72_FRITZBOX.pm
+++ b/fhem/FHEM/72_FRITZBOX.pm
@@ -175,6 +175,7 @@ sub FRITZBOX_Initialize($)
   $hash->{DefFn}    = "FRITZBOX_Define";
   $hash->{UndefFn}  = "FRITZBOX_Undefine";
   $hash->{DeleteFn}  = "FRITZBOX_Delete";
+  $hash->{RenameFn}  = "FRITZBOX_Rename";
 
   $hash->{SetFn}    = "FRITZBOX_Set";
   $hash->{GetFn}    = "FRITZBOX_Get";
@@ -285,6 +286,20 @@ sub FRITZBOX_Delete ($$)
    return undef;
 }
 
+#######################################################################
+sub FRITZBOX_Rename($$)
+{
+    my ($new, $old) = @_; 
+   
+    my $old_index = "FRITZBOX_".$old."_passwd";
+    my $new_index = "FRITZBOX_".$new."_passwd";
+   
+    my ($err, $old_pwd) = getKeyValue($old_index);
+   
+    setKeyValue($new_index, $old_pwd);
+    setKeyValue($old_index, undef);
+}
+
 #######################################################################
 sub FRITZBOX_Attr($@)
 {