[otrs-cvs] FAQ/scripts/test FAQ.t,1.2,1.3

cvs-log at otrs.org cvs-log at otrs.org
Wed Mar 5 23:46:17 GMT 2008


Comments:
Update of /home/cvs/FAQ/scripts/test
In directory lancelot:/tmp/cvs-serv26395/scripts/test

Modified Files:
	FAQ.t 
Log Message:
Added some new faq tests.

Author: martin

Index: FAQ.t
===================================================================
RCS file: /home/cvs/FAQ/scripts/test/FAQ.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FAQ.t	2 Mar 2008 22:26:14 -0000	1.2
--- FAQ.t	5 Mar 2008 23:46:12 -0000	1.3
***************
*** 34,38 ****
  $Self->True(
      $FAQID || 0,
!     "FAQAdd() - FAQAdd()",
  );
  
--- 34,38 ----
  $Self->True(
      $FAQID || 0,
!     "FAQAdd() - 1",
  );
  
***************
*** 142,149 ****
  );
  
  my @FAQIDs = $Self->{FAQObject}->FAQSearch(
      Number => '*',
      What => '*s*',
!     Keywords => 'some*',
      States => ['public', 'internal'],
      Order => 'Votes',
--- 142,172 ----
  );
  
+ my $FAQID2 = $Self->{FAQObject}->FAQAdd(
+     Title => 'Title',
+     CategoryID => 1,
+     StateID => 1,
+     LanguageID => 1,
+     Keywords => '',
+     Field1 => 'Problem1...',
+     Field2 => 'Solution1...',
+     FreeKey1 => 'Software1',
+     FreeText1 => 'Apache 3.4.2',
+     FreeKey2 => 'OS',
+     FreeText2 => 'OpenBSD 4.2.2',
+     FreeKey3 => 'Key3',
+     FreeText3 => 'Value3',
+     FreeKey4 => 'Key4',
+     FreeText4 => 'Value4',
+ );
+ 
+ $Self->True(
+     $FAQID2 || 0,
+     "FAQAdd() - 2",
+ );
+ 
  my @FAQIDs = $Self->{FAQObject}->FAQSearch(
      Number => '*',
      What => '*s*',
!     Keyword => 'some*',
      States => ['public', 'internal'],
      Order => 'Votes',
***************
*** 153,165 ****
  
  my $FAQSearchFound = 0;
  for my $FAQIDSearch ( @FAQIDs ) {
      if ( $FAQIDSearch eq $FAQID ) {
          $FAQSearchFound = 1;
!         last;
      }
  }
  $Self->True(
      $FAQSearchFound,
!     "FAQSearch()",
  );
  
--- 176,224 ----
  
  my $FAQSearchFound = 0;
+ my $FAQSearchFound2 = 0;
  for my $FAQIDSearch ( @FAQIDs ) {
      if ( $FAQIDSearch eq $FAQID ) {
          $FAQSearchFound = 1;
!     }
!     if ( $FAQIDSearch eq $FAQID2 ) {
!         $FAQSearchFound2 = 1;
      }
  }
  $Self->True(
      $FAQSearchFound,
!     "FAQSearch() - $FAQID",
! );
! $Self->False(
!     $FAQSearchFound2,
!     "FAQSearch() - $FAQID2",
! );
! 
! @FAQIDs = $Self->{FAQObject}->FAQSearch(
!     Number => '*',
!     Title => 'tITLe',
!     What  => 'l',
!     States => ['public', 'internal'],
!     Order => 'Created',
!     Sort => 'ASC',
!     Limit => 150,
! );
! 
! $FAQSearchFound = 0;
! $FAQSearchFound2 = 0;
! for my $FAQIDSearch ( @FAQIDs ) {
!     if ( $FAQIDSearch eq $FAQID ) {
!         $FAQSearchFound = 1;
!     }
!     if ( $FAQIDSearch eq $FAQID2 ) {
!         $FAQSearchFound2 = 1;
!     }
! }
! $Self->False(
!     $FAQSearchFound,
!     "FAQSearch() - $FAQID",
! );
! $Self->True(
!     $FAQSearchFound2,
!     "FAQSearch() - $FAQID2",
  );
  
***************
*** 186,188 ****
--- 245,255 ----
  );
  
+ my $FAQDelete2 = $Self->{FAQObject}->FAQDelete(
+     ItemID => $FAQID2,
+ );
+ $Self->True(
+     $FAQDelete2 || 0,
+     "FAQDelete()",
+ );
+ 
  1;


More information about the cvs-log mailing list