diff options
| author | ivan <ivan> | 2002-02-18 20:09:12 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-02-18 20:09:12 +0000 |
| commit | 0ab8b21b9b39d9349c94e6cea10dbb006ff176a5 (patch) | |
| tree | 47853598bb1bdece3af3ff185ed042f00585c493 /httemplate/edit | |
| parent | 6b9a7aefd98a10a0232e02d9fbbaffe30d4c6b97 (diff) | |
bad warning, causing errors with strict
Diffstat (limited to 'httemplate/edit')
| -rwxr-xr-x | httemplate/edit/part_svc.cgi | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/httemplate/edit/part_svc.cgi b/httemplate/edit/part_svc.cgi index 918e6ab9c..57ab3985e 100755 --- a/httemplate/edit/part_svc.cgi +++ b/httemplate/edit/part_svc.cgi @@ -224,7 +224,6 @@ function fixup(what) { print qq!<SELECT NAME="${svcdb}__${field}">!; print '<OPTION> </OPTION>' unless $value; foreach my $record ( qsearch( $def->{select_table}, {} ) ) { - warn $rvalue; my $rvalue = $record->getfield($def->{select_key}); print qq!<OPTION VALUE="$rvalue"!. ( $rvalue==$value ? ' SELECTED>' : '>' ). |