summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--FS/FS/part_pkg/sql_external.pm1
-rwxr-xr-xhttemplate/edit/part_pkg.cgi8
2 files changed, 9 insertions, 0 deletions
diff --git a/FS/FS/part_pkg/sql_external.pm b/FS/FS/part_pkg/sql_external.pm
index a3866f34e..3cdfe992e 100644
--- a/FS/FS/part_pkg/sql_external.pm
+++ b/FS/FS/part_pkg/sql_external.pm
@@ -44,6 +44,7 @@ our @detail_cols = ( qw(amount format duration phonenum accountcode
'default' => '',
},
'query' => { 'name' => 'SQL query',
+ 'type' => 'textarea',
'default' => '',
},
diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi
index 84aac5bde..a6a2a89c5 100755
--- a/httemplate/edit/part_pkg.cgi
+++ b/httemplate/edit/part_pkg.cgi
@@ -987,6 +987,14 @@ my $html_bottom = sub {
: $href->{$field}{'default'} ).
qq!">!;
+ } elsif ( $href->{$field}{'type'} eq 'textarea' ) {
+
+ $html .= qq!<TEXTAREA NAME="${layer}__$field">!.
+ ( exists($options{$field})
+ ? &$format($options{$field})
+ : $href->{$field}{'default'} ).
+ qq!</TEXTAREA>!;
+
} elsif ( $href->{$field}{'type'} eq 'checkbox' ) {
$html .= qq!<INPUT TYPE="checkbox" NAME="${layer}__$field" VALUE=1 !.