* Add the version aware soap subsystem

[debbugs.git] / Debbugs / SOAP / Usertag.pm

diff --git a/Debbugs/SOAP/Usertag.pm b/Debbugs/SOAP/Usertag.pm
deleted file mode 100644 (file)
index 2ee7cea..0000000
--- a/Debbugs/SOAP/Usertag.pm
+++ /dev/null
@@ -1,18 +0,0 @@
-package Debbugs::SOAP::Usertag;
-
-use Debbugs::User;
-
-sub get_usertag {
-    my ($class, $email, $tag) = @_;
-    my %ut = ();
-    Debbugs::User::read_usertags(\%ut, $email);
-    if (defined($tag) and $tag ne "") {
-       # Remove unwanted tags
-       foreach (keys %ut) {
-           delete $ut{$_} unless $_ eq $tag;
-       }
-    }
-    return \%ut;
-}
-
-1;