(Edit) do not crash when trying to rename a user to an already existing name

1 files changed, 5 insertions, 1 deletions

diff --git a/userdrake b/userdrake
index fa1a101..b8af2b2 100755
--- a/userdrake
+++ b/userdrake
@@ -1154,7 +1154,11 @@ sub Edit() {
                    Gtk2::Button->new($_->[0]), clicked => sub {
                        if (!$retv) {
                            if ($p <= 0) {
-                               UserEdit_valid($userEnt, $model, $primgid);
+                               eval { UserEdit_valid($userEnt, $model, $primgid) };
+                               if (my $err = $@) {
+                                   c::set_tagged_utf8($err);
+                                   RaiseError(N("An error occurred:") . "\n" . $err); 
+                               }
                            } elsif ($p == 1) {
                                GroupEdit_valid($groupEnt, $model, $groupname);
                            }