diff options
Diffstat (limited to 'httemplate/view/svc_Common.html')
-rw-r--r-- | httemplate/view/svc_Common.html | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/httemplate/view/svc_Common.html b/httemplate/view/svc_Common.html deleted file mode 100644 index 7ed63c7aa..000000000 --- a/httemplate/view/svc_Common.html +++ /dev/null @@ -1,31 +0,0 @@ -<% include('elements/svc_Common.html', - 'table' => $table, - 'edit_url' => $edit_url, #$p."edit/svc_Common.html?svcdb=$table;svcnum=", - %opt, - ) -%> -<%init> - -# false laziness w/edit/svc_Common.html - -$cgi->param('svcdb') =~ /^(svc_\w+)$/ or die "unparsable svcdb"; -my $table = $1; -require "FS/$table.pm"; - -my $edit_url = svc_url( 'm' => $m, 'action' => 'edit', 'svcdb' => $table, query => '' ); - -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> |