[Openinteract-commits] CVS: OpenInteract2/t manage_list_objects.t,1.6,1.7 manage_list_actions.t,1.7,1.8 context.t,1.41,1.42

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/t
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23075

Modified Files:
	manage_list_objects.t manage_list_actions.t context.t 
Log Message:
fix tests that broke due to removing 'error_filter' action, renaming
'error' action to 'error_browser', and removing 'error' SPOPS object


Index: manage_list_objects.t
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/t/manage_list_objects.t,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** manage_list_objects.t	6 Jun 2004 06:36:03 -0000	1.6
--- manage_list_objects.t	25 Feb 2005 05:32:48 -0000	1.7
***************
*** 6,10 ****
  use lib 't/';
  require 'utils.pl';
! use Test::More  tests => 43;
  
  require_ok( 'OpenInteract2::Manage' );
--- 6,10 ----
  use lib 't/';
  require 'utils.pl';
! use Test::More  tests => 41;
  
  require_ok( 'OpenInteract2::Manage' );
***************
*** 23,36 ****
  my @status = eval { $task->execute };
  ok( ! $@, 'Task executed ok' );
! is( scalar @status, 19,
      'Correct number of SPOPS objects listed' );
  
  my @names = qw(
!     comment comment_notify comment_summary content_type error_object
      full_text_mapping group news news_section object_action page page_content
      page_directory security theme themeprop user user_language whats_new
  );
  my @classes = map { "OpenInteract2::$_" } qw(
!     Comment CommentNotify CommentSummary ContentType ErrorObject
      FullTextMapping Group News NewsSection ObjectAction Page PageContent
      PageDirectory Security Theme ThemeProp User UserLanguage WhatsNew
--- 23,36 ----
  my @status = eval { $task->execute };
  ok( ! $@, 'Task executed ok' );
! is( scalar @status, 18,
      'Correct number of SPOPS objects listed' );
  
  my @names = qw(
!     comment comment_notify comment_summary content_type
      full_text_mapping group news news_section object_action page page_content
      page_directory security theme themeprop user user_language whats_new
  );
  my @classes = map { "OpenInteract2::$_" } qw(
!     Comment CommentNotify CommentSummary ContentType
      FullTextMapping Group News NewsSection ObjectAction Page PageContent
      PageDirectory Security Theme ThemeProp User UserLanguage WhatsNew

Index: manage_list_actions.t
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/t/manage_list_actions.t,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** manage_list_actions.t	6 Jun 2004 06:36:03 -0000	1.7
--- manage_list_actions.t	25 Feb 2005 05:32:48 -0000	1.8
***************
*** 6,10 ****
  use lib 't/';
  require 'utils.pl';
! use Test::More  tests => 49;
  
  require_ok( 'OpenInteract2::Manage' );
--- 6,10 ----
  use lib 't/';
  require 'utils.pl';
! use Test::More  tests => 48;
  
  require_ok( 'OpenInteract2::Manage' );
***************
*** 26,30 ****
  my @names = qw(
      admin_tools_box boxes comment comment_recent content_type
!     edit_document_box error error_filter file_index forgotpassword
      group latest_news login_box logout lookups new new_comment_form
      news news_section news_tools_box newuser
--- 26,30 ----
  my @names = qw(
      admin_tools_box boxes comment comment_recent content_type
!     edit_document_box error_browser file_index forgotpassword
      group latest_news login_box logout lookups new new_comment_form
      news news_section news_tools_box newuser

Index: context.t
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/t/context.t,v
retrieving revision 1.41
retrieving revision 1.42
diff -C2 -d -r1.41 -r1.42
*** context.t	28 Nov 2004 04:49:22 -0000	1.41
--- context.t	25 Feb 2005 05:32:48 -0000	1.42
***************
*** 17,21 ****
  }
  
! plan tests => 153;
  
  require_ok( 'OpenInteract2::Context' );
--- 17,21 ----
  }
  
! plan tests => 152;
  
  require_ok( 'OpenInteract2::Context' );
***************
*** 81,85 ****
  is( ref $action_table, 'HASH',
      'Action table is correct data structure' );
! is( scalar keys %{ $action_table }, 44,
      'Correct number of actions in table' );
  
--- 81,85 ----
  is( ref $action_table, 'HASH',
      'Action table is correct data structure' );
! is( scalar keys %{ $action_table }, 43,
      'Correct number of actions in table' );
  
***************
*** 157,165 ****
  is( ref $spops_config, 'HASH',
      'SPOPS config is correct data structure' );
! is( scalar keys %{ $spops_config }, 19,
      'Correct number of SPOPS configs in structure' );
  
- is( $ctx->lookup_object( 'error_object' ), 'OpenInteract2::ErrorObject',
-     'SPOPS error lookup matched' );
  is( $ctx->lookup_object( 'group' ), 'OpenInteract2::Group',
      'SPOPS group lookup matched' );
--- 157,163 ----
  is( ref $spops_config, 'HASH',
      'SPOPS config is correct data structure' );
! is( scalar keys %{ $spops_config }, 18,
      'Correct number of SPOPS configs in structure' );
  
  is( $ctx->lookup_object( 'group' ), 'OpenInteract2::Group',
      'SPOPS group lookup matched' );