[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