X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fstemmaweb%2FController%2FRoot.pm;h=f66dcd573f3e1a1cc06c229202b9a0c766354863;hb=16a7dd1f7e853704ca345de9e88a880dbb137050;hp=be1ba727cb6c1351c169c2f2c76492fda17227cf;hpb=0844ddeebb042ac91b556b6c65da3d5abd61a161;p=scpubgit%2Fstemmaweb.git diff --git a/lib/stemmaweb/Controller/Root.pm b/lib/stemmaweb/Controller/Root.pm index be1ba72..f66dcd5 100644 --- a/lib/stemmaweb/Controller/Root.pm +++ b/lib/stemmaweb/Controller/Root.pm @@ -279,6 +279,9 @@ sub textinfo :Local :Args(1) { if( exists $params->{'owner'} ) { # Only admins can update user / owner my $newownerid = delete $params->{'owner'}; + if( $tradition->has_user && !$tradition->user ) { + $tradition->clear_user; + } unless( !$newownerid || ( $tradition->has_user && $tradition->user->email eq $newownerid ) ) { unless( $c->user->get_object->is_admin ) {