diff options
| -rw-r--r-- | LedgerSMB/Form.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index ca2abc6f..920870ca 100644 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -547,7 +547,7 @@ sub sort_columns { $self->{sort} =~ s/^"*(.*?)"*$/$1/; if (@columns) { @columns = grep !/^$self->{sort}$/, @columns; - if ($self->{sort} !~ /^\d*$/){ + if ($self->{sort} !~ /^\w*$/){ $self->{sort} = $self->{dbh}->quote_identifier($self->{sort}); } splice @columns, 0, 0, $self->{sort}; |