[freeside-commits] freeside/FS/FS svc_acct.pm, 1.251, 1.252 svc_Common.pm, 1.49, 1.50
Ivan,,,
ivan at wavetail.420.am
Mon Mar 23 10:03:05 PDT 2009
Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv14478
Modified Files:
svc_acct.pm svc_Common.pm
Log Message:
add name (svc_acct.finger) to bulk billing detail, RT#3519
Index: svc_Common.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_Common.pm,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -d -r1.49 -r1.50
--- svc_Common.pm 21 Dec 2008 21:37:08 -0000 1.49
+++ svc_Common.pm 23 Mar 2009 17:03:03 -0000 1.50
@@ -151,6 +151,11 @@
$self->svcnum;
}
+sub label_long {
+ my $self = shift;
+ $self->label(@_);
+}
+
=item check
Checks the validity of fields in this record.
Index: svc_acct.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_acct.pm,v
retrieving revision 1.251
retrieving revision 1.252
diff -u -d -r1.251 -r1.252
--- svc_acct.pm 18 Mar 2009 00:30:42 -0000 1.251
+++ svc_acct.pm 23 Mar 2009 17:03:03 -0000 1.252
@@ -256,7 +256,7 @@
disable_inventory => 1,
disable_select => 1,
},
- 'finger' => 'Real name (GECOS)',
+ 'finger' => 'Real name', # (GECOS)',
'domsvc' => {
label => 'Domain',
#def_label => 'svcnum from svc_domain',
@@ -446,8 +446,23 @@
$self->email(@_);
}
+=item label_long [ END_TIMESTAMP [ START_TIMESTAMP ] ]
+
+Returns a longer string label for this acccount ("Real Name <username at domain>"
+if available, or "username at domain").
+
+END_TIMESTAMP and START_TIMESTAMP can optionally be passed when dealing with
+history records.
+
=cut
+sub label_long {
+ my $self = shift;
+ ( $self->finger =~ /\S/ )
+ ? $self->finger. ' <'.$self->label(@_).'>'
+ : $self->label(@_);
+}
+
=item insert [ , OPTION => VALUE ... ]
Adds this account to the database. If there is an error, returns the error,
More information about the freeside-commits
mailing list