From 6bda747d1e2c0e8474beca9e479382bc976acf8f Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Fri, 10 Feb 2012 17:05:41 +0100 Subject: [PATCH] safe_name methode in Employee MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Wird für Anzeige gebraucht --- SL/DB/Employee.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/SL/DB/Employee.pm b/SL/DB/Employee.pm index 8688e8297..92444551e 100644 --- a/SL/DB/Employee.pm +++ b/SL/DB/Employee.pm @@ -12,4 +12,10 @@ sub has_right { return $::auth->check_right($self->login, $right); } +sub safe_name { + my ($self) = @_; + + return $self->name || $self->login; +} + 1; -- 2.20.1