Update of /cvsroot/popfile/engine/tests
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25319/tests
Modified Files:
Tag: b0_22_2
TestIMAP.tst
Log Message:
Sanity-check our configuration values and add tests for this.
Index: TestIMAP.tst
===================================================================
RCS file: /cvsroot/popfile/engine/tests/TestIMAP.tst,v
retrieving revision 1.3.4.10
retrieving revision 1.3.4.11
diff -C2 -d -r1.3.4.10 -r1.3.4.11
*** TestIMAP.tst 26 Nov 2007 11:07:37 -0000 1.3.4.10
--- TestIMAP.tst 30 Nov 2007 21:13:39 -0000 1.3.4.11
***************
*** 230,233 ****
--- 230,234 ----
# The module is supposed to retrieve the list of mailboxes if it
# hasn't got any yet.
+ $im->log_( 0, '---- using invalid uidvalidities' );
$im->{mailboxes__} = [];
$im->{last_update__} = 0;
***************
*** 236,239 ****
--- 237,248 ----
$im->disconnect_folders__();
+ # Give an invalid configuration string for uidnexts and uidvalidities
+ # and see whether we react in a graceful manner
+ $newvalis = $uidvalis;
+ $newvalis =~ s/-->(\d+)-->/-->-->/;
+ $im->config_( 'uidvalidities', $newvalis );
+ $im->{last_update__} = 0;
+ $im->service();
+ test_assert_equal( $im->config_('uidvalidities'), $uidvalis );
# Check what happens when we time out
|
