[Catalyst-commits] r9448 - in trunk/Catalyst-Plugin-Authentication-Store-LDAP: . t

t0m at dev.catalyst.perl.org t0m at dev.catalyst.perl.org
Sat Mar 7 16:45:35 GMT 2009


Author: t0m
Date: 2009-03-07 16:45:35 +0000 (Sat, 07 Mar 2009)
New Revision: 9448

Removed:
   trunk/Catalyst-Plugin-Authentication-Store-LDAP/inc/
   trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/01-pre_realms_api.t
   trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/02-realms_api.t
   trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/entry_class.t
Modified:
   trunk/Catalyst-Plugin-Authentication-Store-LDAP/Changes
Log:
Nuke failing cross-internot tests, deprecated code anyway. Also remove M::I fail.

Modified: trunk/Catalyst-Plugin-Authentication-Store-LDAP/Changes
===================================================================
--- trunk/Catalyst-Plugin-Authentication-Store-LDAP/Changes	2009-03-07 16:20:19 UTC (rev 9447)
+++ trunk/Catalyst-Plugin-Authentication-Store-LDAP/Changes	2009-03-07 16:45:35 UTC (rev 9448)
@@ -1,3 +1,7 @@
+SVN UNRELEASED:
+    - Remove Module::Install generated inc directory, should not be in svn (t0m)
+    - Removed all of the now failing tests (t0m)
+
 0.0601  karman  4 Feb 2008
     - marked as deprecated in favor of Catalyst::Authentication::Store::LDAP
     - changed release date for 0.0600

Deleted: trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/01-pre_realms_api.t
===================================================================
--- trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/01-pre_realms_api.t	2009-03-07 16:20:19 UTC (rev 9447)
+++ trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/01-pre_realms_api.t	2009-03-07 16:45:35 UTC (rev 9448)
@@ -1,29 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-use Catalyst::Exception;
-
-use Test::More tests => 4;
-
-BEGIN { use_ok("Catalyst::Plugin::Authentication::Store::LDAP::Backend") }
-
-my $back = Catalyst::Plugin::Authentication::Store::LDAP::Backend->new(
-    {   'ldap_server' => 'ldap.openldap.org',
-        'binddn'      => 'anonymous',
-        'bindpw'      => 'dontcarehow',
-        'start_tls'   => 0,
-        'user_basedn' => 'ou=People,dc=OpenLDAP,dc=Org',
-        'user_filter' => '(&(objectClass=person)(uid=%s))',
-        'user_scope'  => 'one',
-        'user_field'  => 'uid',
-        'use_roles'   => 0,
-    }
-);
-
-isa_ok( $back, "Catalyst::Plugin::Authentication::Store::LDAP::Backend" );
-my $user = $back->get_user('kurt');
-isa_ok( $user, "Catalyst::Plugin::Authentication::Store::LDAP::User" );
-my $displayname = $user->displayname;
-cmp_ok( $displayname, 'eq', 'Kurt Zeilenga', 'Should be Kurt Zeilenga' );
-

Deleted: trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/02-realms_api.t
===================================================================
--- trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/02-realms_api.t	2009-03-07 16:20:19 UTC (rev 9447)
+++ trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/02-realms_api.t	2009-03-07 16:45:35 UTC (rev 9448)
@@ -1,29 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-use Catalyst::Exception;
-
-use Test::More tests => 4;
-
-BEGIN { use_ok("Catalyst::Plugin::Authentication::Store::LDAP::Backend") }
-
-my $back = Catalyst::Plugin::Authentication::Store::LDAP::Backend->new(
-    {   'ldap_server' => 'ldap.openldap.org',
-        'binddn'      => 'anonymous',
-        'bindpw'      => 'dontcarehow',
-        'start_tls'   => 0,
-        'user_basedn' => 'ou=People,dc=OpenLDAP,dc=Org',
-        'user_filter' => '(&(objectClass=person)(uid=%s))',
-        'user_scope'  => 'one',
-        'user_field'  => 'uid',
-        'use_roles'   => 0,
-    }
-);
-
-isa_ok( $back, "Catalyst::Plugin::Authentication::Store::LDAP::Backend" );
-my $user = $back->find_user( { username => 'kurt' } );
-isa_ok( $user, "Catalyst::Plugin::Authentication::Store::LDAP::User" );
-my $displayname = $user->displayname;
-cmp_ok( $displayname, 'eq', 'Kurt Zeilenga', 'Should be Kurt Zeilenga' );
-

Deleted: trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/entry_class.t
===================================================================
--- trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/entry_class.t	2009-03-07 16:20:19 UTC (rev 9447)
+++ trunk/Catalyst-Plugin-Authentication-Store-LDAP/t/entry_class.t	2009-03-07 16:45:35 UTC (rev 9448)
@@ -1,31 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-use Catalyst::Exception;
-
-use Test::More tests => 6;
-use lib 't/lib';
-
-BEGIN { use_ok("Catalyst::Plugin::Authentication::Store::LDAP::Backend") }
-
-my $back = Catalyst::Plugin::Authentication::Store::LDAP::Backend->new({
-            'ldap_server' => 'ldap.openldap.org',
-            'binddn' => 'anonymous',
-            'bindpw' => 'dontcarehow',
-            'start_tls' => 0,
-            'user_basedn' => 'ou=People,dc=OpenLDAP,dc=Org',
-            'user_filter' => '(&(objectClass=person)(uid=%s))',
-            'user_scope' => 'one',
-            'user_field' => 'uid',
-            'use_roles' => 0,
-            'entry_class' => 'EntryClass',
-    });
-isa_ok($back, "Catalyst::Plugin::Authentication::Store::LDAP::Backend");
-my $user = $back->get_user('kurt');
-isa_ok($user, "Catalyst::Plugin::Authentication::Store::LDAP::User");
-my $displayname = $user->displayname;
-cmp_ok($displayname, 'eq', 'Kurt Zeilenga', 'Should be Kurt Zeilenga');
-
-isa_ok($user->ldap_entry, "EntryClass", "entry_class works");
-is($user->ldap_entry->my_method, 1001, "methods on entry_class works");




More information about the Catalyst-commits mailing list