X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fedit%2Fpart_export.cgi;h=32ed1fc94e7a758daa51a2cb94a317ad13f64b99;hb=dd65ba99bb9281571f19744154a3b03bcd3f01ab;hp=d57979751c3242ab99cd149a96c2c0518cb9b7c2;hpb=0930d22ffc440f80c1b222b2e750cadbabd9e8f6;p=freeside.git
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi
index d57979751..32ed1fc94 100644
--- a/httemplate/edit/part_export.cgi
+++ b/httemplate/edit/part_export.cgi
@@ -6,6 +6,12 @@
<% ntable("#cccccc",2) %>
+
+ Export name |
+
+
+ |
+
Export host |
@@ -53,7 +59,7 @@ my $widget = new HTML::Widgets::SelectLayers(
'options' => \%layers,
'form_name' => 'dummy',
'form_action' => 'process/part_export.cgi',
- 'form_text' => [qw( exportnum machine )],
+ 'form_text' => [qw( exportnum exportname machine )],
# 'form_checkbox' => [qw()],
'html_between' => " |
\n",
'layer_callback' => sub {
@@ -77,15 +83,39 @@ my $widget = new HTML::Widgets::SelectLayers(
? $optinfo->{default}
: ''
);
- $html .= qq!$label | !;
+ # 'freeform': disables table formatting of options. Instead, each
+ # option can define "before" and "after" strings which are inserted
+ # around the selector.
+ my $freeform = $optinfo->{freeform};
+ if ( $freeform ) {
+ $html .= $optinfo->{before} || '';
+ }
+ else {
+ $html .= qq! |
$label | !;
+ }
if ( $type eq 'select' ) {
- $html .= qq! |
';
+ }
}
$html .= '';