remove Tie::CPHash
This commit is contained in:
parent
ca7321f068
commit
29d1908e15
9 changed files with 2 additions and 17 deletions
|
|
@ -20,7 +20,6 @@ use WebGUI::Utility;
|
|||
use WebGUI::Workflow::Instance;
|
||||
use JSON ();
|
||||
use WebGUI::ProfileField;
|
||||
use Tie::CPHash;
|
||||
use Scalar::Util qw( weaken );
|
||||
use Net::CIDR::Lite;
|
||||
|
||||
|
|
@ -1075,7 +1074,6 @@ sub new {
|
|||
weaken( $self->{_session} );
|
||||
unless ($self->{_userId} && $self->{_user}{username}) {
|
||||
my %user;
|
||||
tie %user, 'Tie::CPHash';
|
||||
%user = $session->db->quickHash("select * from users where userId=?",[$userId]);
|
||||
my %profile
|
||||
= $session->db->quickHash(
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue