diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-07 01:40:41 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-07 01:40:41 +0000 |
| commit | 0d779a471c0488b5900d9bf07aec0b7ba419f05d (patch) | |
| tree | 7b0ab3b11efe98daf194559b7d3f50e7c778e946 /LedgerSMB/Form.pm | |
| parent | 71cb342705bfd86c67aece91dfb6f533f9859603 (diff) | |
Fixing bug 1789750
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1527 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/Form.pm')
| -rw-r--r-- | LedgerSMB/Form.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index db086a09..ca2abc6f 100644 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -544,6 +544,7 @@ sub sort_columns { my ( $self, @columns ) = @_; if ( $self->{sort} ) { + $self->{sort} =~ s/^"*(.*?)"*$/$1/; if (@columns) { @columns = grep !/^$self->{sort}$/, @columns; if ($self->{sort} !~ /^\d*$/){ |