[Turn off line numbering]1: arg old_name, new_name; 2: 3: // adjusts the database for the new name 4: if (!.trusts(caller()) && sender() != this()) 5: throw(~perm, "Permission denied."); 6: old_name = .strip_key(old_name); 7: new_name = .strip_key(new_name); 8: (> pass(old_name, new_name) <);
// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit
---- 57 $registry.key_changed(old_name, new_name) ---- 65 $db.key_changed(old_key, new_key)