diff options
| author | mark <mark> | 2011-12-28 23:56:20 +0000 |
|---|---|---|
| committer | mark <mark> | 2011-12-28 23:56:20 +0000 |
| commit | b6dbe0f12dbbe4ea5209367f905f937789b5b607 (patch) | |
| tree | 39434f7f4f20b901bcd27e2f120c46e9b713815d /httemplate/edit/part_export.cgi | |
| parent | 9ad2437e1cfaffceb657216a48ea3c7cc9414922 (diff) | |
broadband_nas export, #15284
Diffstat (limited to 'httemplate/edit/part_export.cgi')
| -rw-r--r-- | httemplate/edit/part_export.cgi | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi index 9a0e0bd29..1450ac3b3 100644 --- a/httemplate/edit/part_export.cgi +++ b/httemplate/edit/part_export.cgi @@ -51,8 +51,12 @@ $action ||= $part_export->exportnum ? 'Edit' : 'Add'; #my $exports = FS::part_export::export_info($svcdb); my $exports = FS::part_export::export_info(); -my %layers = map { $_ => "$_ - ". $exports->{$_}{desc} } keys %$exports; -$layers{''}=''; +tie my %layers, 'Tie::IxHash', + '' => '', + map { $_ => "$_ - ". $exports->{$_}{desc} } + sort { $a cmp $b } + keys %$exports; +; my $widget = new HTML::Widgets::SelectLayers( 'selected_layer' => $part_export->exporttype, @@ -83,6 +87,13 @@ my $widget = new HTML::Widgets::SelectLayers( ? $optinfo->{default} : '' ); + if ( $type eq 'title' ) { + $html .= qq!<TR><TH COLSPAN=1 ALIGN="right"><FONT SIZE="+1">! . + $label . + '</FONT></TH></TR>'; + next; + } + # 'freeform': disables table formatting of options. Instead, each # option can define "before" and "after" strings which are inserted # around the selector. |