From: Don Armstrong <don@donarmstrong.com>
Date: Sun, 10 Aug 2008 13:52:13 +0000 (-0700)
Subject: remove deprecationn warnings for the time being in Debbugs::User
X-Git-Tag: release/2.6.0~481^2~2
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=660edfba2fd6ff066dee6ed0c4ad857ff839b1b4;p=debbugs.git

remove deprecationn warnings for the time being in Debbugs::User
---

diff --git a/Debbugs/User.pm b/Debbugs/User.pm
index cbb0fa8..c091031 100644
--- a/Debbugs/User.pm
+++ b/Debbugs/User.pm
@@ -318,7 +318,7 @@ sub write {
 sub read_usertags {
     my ($usertags,$email) = @_;
 
-    carp "read_usertags is deprecated";
+#    carp "read_usertags is deprecated";
     my $user = get_user($email);
     for my $tag (keys %{$user->{"tags"}}) {
         $usertags->{$tag} = [] unless defined $usertags->{$tag};
@@ -339,7 +339,7 @@ them out.
 sub write_usertags {
     my ($usertags,$email) = @_;
 
-    carp "write_usertags is deprecated";
+#    carp "write_usertags is deprecated";
     my $user = Debbugs::User->new($email,1); # locked
     $user->{"tags"} = { %{$usertags} };
     $user->write();