Changeset 1786 for trunk/LATMOS-Accounts

Timestamp:

06/22/16 09:34:24 (8 years ago)

Author:

nanardon

Message:

Stringify group to display label on contract

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm (modified) (2 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm

@@ -4 +4 @@
 use strict;
 use warnings;
+use overload '""' => 'stringify';
 
 use base qw(LATMOS::Accounts::Bases::Sql::objects);
@@ -16 +17 @@
 
 =cut
+
+sub stringify {
+    my ($self) = @_;
+
+    $self->get_field('label')
+    || $self->id;
+}
 
 sub _object_table { 'group' }