diff options
author | ivan <ivan> | 2004-06-18 10:28:11 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-06-18 10:28:11 +0000 |
commit | 4dbd0e09bd8fe1958eb294ebd425878c420afe6a (patch) | |
tree | 911f6ae9a5e2d085110410a35dcffd2bf1f30724 /httemplate/search/cust_main-otaker.cgi | |
parent | 5d154e4e153a66c2349ee0c6ca942fa017bfb139 (diff) |
masonize fix: avoid newline prepend fix from borking indented first <%, fixes customer search by otaker under mason, closes: Bug#830
Diffstat (limited to 'httemplate/search/cust_main-otaker.cgi')
-rwxr-xr-x | httemplate/search/cust_main-otaker.cgi | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/httemplate/search/cust_main-otaker.cgi b/httemplate/search/cust_main-otaker.cgi index 68569f085..44214368a 100755 --- a/httemplate/search/cust_main-otaker.cgi +++ b/httemplate/search/cust_main-otaker.cgi @@ -10,10 +10,9 @@ <FORM ACTION="cust_main.cgi" METHOD="post"> Search for <B>Order taker</B>: <INPUT TYPE="hidden" NAME="otaker_on" VALUE="TRUE"> - <% my $dbh = dbh; - my $sth = $dbh->prepare("SELECT DISTINCT otaker FROM cust_main") - or eidiot $dbh->errstr; - $sth->execute() or eidiot $sth->errstr; + <% my $sth = dbh->prepare("SELECT DISTINCT otaker FROM cust_main") + or die dbh->errstr; + $sth->execute() or die $sth->errstr; # my @otakers = map { $_->[0] } @{$sth->selectall_arrayref}; %> <SELECT NAME="otaker"> |