diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-07 01:54:37 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-07 01:54:37 +0000 |
commit | a4d47dfe9870499275e95637d316cb8d95c290d3 (patch) | |
tree | f67381b05cdb2b4908c65e6094346d4ddb448121 /LedgerSMB | |
parent | 7b74042c60b0054faf4c046379d94d74d8eabd0f (diff) |
Fixing bug 1789749
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1528 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-x | LedgerSMB/Form.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index 30d848a7..c48f5b68 100755 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -364,7 +364,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}; |