summaryrefslogtreecommitdiff
path: root/httemplate/edit/svc_Common.html
diff options
context:
space:
mode:
authorcvs2git <cvs2git>2008-03-16 19:58:34 +0000
committercvs2git <cvs2git>2008-03-16 19:58:34 +0000
commiteb061f5119325e666f0dff40d4089e5c1df58e17 (patch)
treed55e8fef5aca62eb13bbc8ad20dbdf941c3bd266 /httemplate/edit/svc_Common.html
parent3a17b276638200475d54201fa62566b7440e819a (diff)
This commit was manufactured by cvs2svn to create tag 'TRIXBOX_2_6'.TRIXBOX_2_6
Diffstat (limited to 'httemplate/edit/svc_Common.html')
-rw-r--r--httemplate/edit/svc_Common.html33
1 files changed, 0 insertions, 33 deletions
diff --git a/httemplate/edit/svc_Common.html b/httemplate/edit/svc_Common.html
deleted file mode 100644
index 6666d9720..000000000
--- a/httemplate/edit/svc_Common.html
+++ /dev/null
@@ -1,33 +0,0 @@
-<% include('elements/svc_Common.html',
- 'table' => $table,
- 'post_url' => popurl(1). "process/svc_Common.html",
- %opt,
- )
-%>
-<%init>
-
-die "access denied"
- unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
-
-# false laziness w/view/svc_Common.html
-
-$cgi->param('svcdb') =~ /^(svc_\w+)$/ or die "unparsable svcdb";
-my $table = $1;
-require "FS/$table.pm";
-
-my %opt;
-if ( UNIVERSAL::can("FS::$table", 'table_info') ) {
- $opt{'name'} = "FS::$table"->table_info->{'name'};
-
- my $fields = "FS::$table"->table_info->{'fields'};
- my %labels = map { $_ => ( ref($fields->{$_})
- ? $fields->{$_}{'label'}
- : $fields->{$_}
- );
- }
- keys %$fields;
- $opt{'labels'} = \%labels;
-
-}
-
-</%init>