X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fsvc_Common.html;h=7b46dc9c986feb8819e0c59b2c61743e5ebb72e8;hb=dcbcdb1ed71883f8a88eda28f89d8835c38c514e;hp=bb3a6dd33beae8572d26b42bd1c17b3fa0f8d14d;hpb=ffcad49ae9b3b54094f8282bec67759399b57c95;p=freeside.git diff --git a/httemplate/view/svc_Common.html b/httemplate/view/svc_Common.html index bb3a6dd33..7b46dc9c9 100644 --- a/httemplate/view/svc_Common.html +++ b/httemplate/view/svc_Common.html @@ -1,3 +1,8 @@ +<& 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 @@ -6,6 +11,8 @@ $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'}; @@ -21,9 +28,3 @@ if ( UNIVERSAL::can("FS::$table", 'table_info') ) { } -<% include('elements/svc_Common.html', - 'table' => $table, - 'edit_url' => $p."edit/svc_Common.html?svcdb=$table;svcnum=", - %opt, - ) -%>