[bugzilla-gnome-org-upstream/production] apply patch for upstream bug 651786

[Olav Vitters <ovitters src gnome org>]

commit 552b5acb74042a9406a77e69a44423bb63bce303
Author: Olav Vitters <olav vitters nl>
Date:   Sun Feb 15 02:51:18 2015 +0100

    apply patch for upstream bug 651786

 Bugzilla/User.pm |    5 ++---
 1 files changed, 2 insertions(+), 3 deletions(-)
---
diff --git a/Bugzilla/User.pm b/Bugzilla/User.pm
index aa94e44..5d1c42a 100644
--- a/Bugzilla/User.pm
+++ b/Bugzilla/User.pm
@@ -28,7 +28,6 @@ use Bugzilla::Group;
 use DateTime::TimeZone;
 use List::Util qw(max);
 use Scalar::Util qw(blessed);
-use Storable qw(dclone);
 use URI;
 use URI::QueryParam;
 
@@ -123,7 +122,7 @@ sub new {
     my $class = ref($invocant) || $invocant;
     my ($param) = @_;
 
-    my $user = DEFAULT_USER;
+    my $user = { %{ DEFAULT_USER() } };
     bless ($user, $class);
     return $user unless $param;
 
@@ -141,7 +140,7 @@ sub super_user {
     my $class = ref($invocant) || $invocant;
     my ($param) = @_;
 
-    my $user = dclone(DEFAULT_USER);
+    my $user = { %{ DEFAULT_USER() } };
     $user->{groups} = [Bugzilla::Group->get_all];
     $user->{bless_groups} = [Bugzilla::Group->get_all];
     bless $user, $class;