This commit was manufactured by cvs2svn to create tag 'TORRUS_1_0_9'.TORRUS_1_0_9

1 files changed, 0 insertions, 40 deletions

diff --git a/rt/t/shredder/03plugin_users.t b/rt/t/shredder/03plugin_users.t
deleted file mode 100644
index 45fc8a27e..000000000
--- a/rt/t/shredder/03plugin_users.t
+++ /dev/null
@@ -1,40 +0,0 @@
-#!/usr/bin/perl -w
-
-use strict;
-use warnings;
-
-use Test::Deep;
-use File::Spec;
-use Test::More tests => 9;
-use RT::Test ();
-BEGIN {
-    my $shredder_utils = RT::Test::get_relocatable_file('utils.pl',
-        File::Spec->curdir());
-    require $shredder_utils;
-}
-
-
-my @ARGS = sort qw(limit status name member_of email replace_relations no_tickets);
-
-use_ok('RT::Shredder::Plugin::Users');
-{
-    my $plugin = new RT::Shredder::Plugin::Users;
-    isa_ok($plugin, 'RT::Shredder::Plugin::Users');
-
-    is(lc $plugin->Type, 'search', 'correct type');
-
-    my @args = sort $plugin->SupportArgs;
-    cmp_deeply(\@args, \@ARGS, "support all args");
-
-
-    my ($status, $msg) = $plugin->TestArgs( name => 'r??t*' );
-    ok($status, "arg name = 'r??t*'") or diag("error: $msg");
-
-    for (qw(any disabled enabled)) {
-        my ($status, $msg) = $plugin->TestArgs( status => $_ );
-        ok($status, "arg status = '$_'") or diag("error: $msg");
-    }
-    ($status, $msg) = $plugin->TestArgs( status => '!@#' );
-    ok(!$status, "bad 'status' arg value");
-}
-