diff options
author | cvs2git <cvs2git> | 2008-03-16 19:58:34 +0000 |
---|---|---|
committer | cvs2git <cvs2git> | 2008-03-16 19:58:34 +0000 |
commit | eb061f5119325e666f0dff40d4089e5c1df58e17 (patch) | |
tree | d55e8fef5aca62eb13bbc8ad20dbdf941c3bd266 /httemplate/view/svc_Common.html | |
parent | 3a17b276638200475d54201fa62566b7440e819a (diff) |
This commit was manufactured by cvs2svn to create tag 'TRIXBOX_2_6'.TRIXBOX_2_6
Diffstat (limited to 'httemplate/view/svc_Common.html')
-rw-r--r-- | httemplate/view/svc_Common.html | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/httemplate/view/svc_Common.html b/httemplate/view/svc_Common.html deleted file mode 100644 index bb3a6dd33..000000000 --- a/httemplate/view/svc_Common.html +++ /dev/null @@ -1,29 +0,0 @@ -<%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 %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> -<% include('elements/svc_Common.html', - 'table' => $table, - 'edit_url' => $p."edit/svc_Common.html?svcdb=$table;svcnum=", - %opt, - ) -%> |