diff options
| -rw-r--r-- | LedgerSMB/DBObject.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/LedgerSMB/DBObject.pm b/LedgerSMB/DBObject.pm index d2ce0fbb..f7f16c7d 100644 --- a/LedgerSMB/DBObject.pm +++ b/LedgerSMB/DBObject.pm @@ -76,6 +76,7 @@ sub new { $self->merge($base, keys => ['dbh', '_roles', '_user', '_locale']); } elsif (lc($mode) eq 'list'){ + $self->merge($base, keys => ['dbh', '_roles', '_user', '_locale']); $self->merge($base, keys => \@mergelist); } else { |