[freeside-commits] freeside/fs_selfservice/FS-SelfService SelfService.pm, 1.32, 1.33
Ivan,,,
ivan at wavetail.420.am
Fri Jun 27 01:53:15 PDT 2008
Update of /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService
In directory wavetail.420.am:/tmp/cvs-serv320/fs_selfservice/FS-SelfService
Modified Files:
SelfService.pm
Log Message:
adding signup_server-service config
Index: SelfService.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/SelfService.pm,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -d -r1.32 -r1.33
--- SelfService.pm 19 Feb 2008 02:57:55 -0000 1.32
+++ SelfService.pm 27 Jun 2008 08:53:13 -0000 1.33
@@ -58,7 +58,7 @@
'agent_info' => 'Agent/agent_info',
'agent_list_customers' => 'Agent/agent_list_customers',
);
- at EXPORT_OK = ( keys(%autoload), qw( regionselector expselect popselector domainselector) );
+ at EXPORT_OK = ( keys(%autoload), qw( regionselector expselect popselector domainselector didselector) );
$ENV{'PATH'} ='/usr/bin:/usr/ucb:/bin';
$ENV{'SHELL'} = '/bin/sh';
@@ -1437,6 +1437,30 @@
}
+=item didselector HASHREF | LIST
+
+Takes as input a hashref or list of key/value pairs with the following keys:
+
+=over 4
+
+=back
+
+Returns an HTML fragment for DID selection.
+
+=cut
+
+sub didselector {
+ my $param;
+ if ( ref($_[0]) ) {
+ $param = shift;
+ } else {
+ $param = { @_ };
+ }
+
+ return "choose your DID XXX";
+
+}
+
=back
=head1 RESELLER FUNCTIONS
More information about the freeside-commits
mailing list