/[mailutils]/mailutils/imap4d/testsuite/imap4d/examine.exp
ViewVC logotype

Diff of /mailutils/imap4d/testsuite/imap4d/examine.exp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by gray, Fri Aug 23 12:27:01 2002 UTC revision 1.3 by gray, Sun Aug 25 12:38:22 2002 UTC
# Line 18  Line 18 
18    
19  imap4d_start  imap4d_start
20  imap4d_auth "user!passwd" "guessme"  imap4d_auth "user!passwd" "guessme"
   
 proc get_uidvalidity {} {  
         regsub "(\[0-9\]*)\[0-9\]" "[clock seconds]" "\\1\[0-9\]" val  
         return $val  
 }  
   
21  imap4d_test "EXAMINE INBOX"\  imap4d_test "EXAMINE INBOX"\
22  "95 EXISTS"\  "95 EXISTS"\
23  "95 RECENT"\  "95 RECENT"\
24  -re "OK \\\[UIDVALIDITY [get_uidvalidity]\\\] UID valididy status"\  -re "OK \\\[UIDVALIDITY [imap4d_uidvalidity]\\\] UID valididy status"\
25  "OK \[UIDNEXT 96\] Predicted next uid"\  "OK \[UIDNEXT 96\] Predicted next uid"\
26  "OK \[UNSEEN 1\] first unseen messsage"\  "OK \[UNSEEN 1\] first unseen messsage"\
27  "FLAGS (\\Answered \\Flagged \\Deleted \\Seen \\Draft)"\  "FLAGS (\\Answered \\Flagged \\Deleted \\Seen \\Draft)"\
28  "OK \[PERMANENTFLAGS ()\] No Permanent flags"\  "OK \[PERMANENTFLAGS ()\] No Permanent flags"\
29  "OK \[READ-ONLY\] EXAMINE Completed"  "OK \[READ-ONLY\] EXAMINE Completed"
30    
 set UIDVALIDITY [clock seconds]  
   
31  imap4d_test "SELECT INBOX"\  imap4d_test "SELECT INBOX"\
32  "95 EXISTS"\  "95 EXISTS"\
33  "95 RECENT"\  "95 RECENT"\
34  -re "OK \\\[UIDVALIDITY [get_uidvalidity]\\\] UID valididy status"\  -re "OK \\\[UIDVALIDITY [imap4d_uidvalidity]\\\] UID valididy status"\
35  "OK \[UIDNEXT 96\] Predicted next uid"\  "OK \[UIDNEXT 96\] Predicted next uid"\
36  "OK \[UNSEEN 1\] first unseen messsage "\  "OK \[UNSEEN 1\] first unseen messsage "\
37  "FLAGS (\\Answered \\Flagged \\Deleted \\Seen \\Draft)"\  "FLAGS (\\Answered \\Flagged \\Deleted \\Seen \\Draft)"\
# Line 47  imap4d_test "SELECT INBOX"\ Line 39  imap4d_test "SELECT INBOX"\
39  "OK \[READ-WRITE\] SELECT Completed"  "OK \[READ-WRITE\] SELECT Completed"
40    
41  imap4d_test "STATUS INBOX (MESSAGES RECENT UNSEEN UIDVALIDITY UIDNEXT)" \  imap4d_test "STATUS INBOX (MESSAGES RECENT UNSEEN UIDVALIDITY UIDNEXT)" \
42  -re "STATUS INBOX \\(MESSAGES 95 RECENT 95 UNSEEN 95 UIDVALIDITY [get_uidvalidity] UIDNEXT 96 \\)" \  -re "STATUS INBOX \\(MESSAGES 95 RECENT 95 UNSEEN 95 UIDVALIDITY [imap4d_uidvalidity] UIDNEXT 96 \\)" \
43  "OK"  "OK"
44    
45  imap4d_test "STATUS mbox1 (MESSAGES RECENT UNSEEN UIDNEXT)" \  imap4d_test "STATUS mbox1 (MESSAGES RECENT UNSEEN UIDNEXT)" \
46  "STATUS mbox1 (MESSAGES 4 RECENT 4 UNSEEN 4 UIDNEXT 5 )" \  "STATUS mbox1 (MESSAGES 4 RECENT 4 UNSEEN 4 UIDNEXT 5 )" \
47  "OK"  "OK"
48    
 set U [clock seconds]  
49  imap4d_test "EXAMINE mbox1" \  imap4d_test "EXAMINE mbox1" \
50  "4 EXISTS"\  "4 EXISTS"\
51  "4 RECENT"\  "4 RECENT"\
52  -re "OK \\\[UIDVALIDITY [get_uidvalidity]\\\] UID valididy status"\  -re "OK \\\[UIDVALIDITY [imap4d_uidvalidity]\\\] UID valididy status"\
53  "OK \[UIDNEXT 5\] Predicted next uid"\  "OK \[UIDNEXT 5\] Predicted next uid"\
54  "OK \[UNSEEN 1\] first unseen messsage"\  "OK \[UNSEEN 1\] first unseen messsage"\
55  "FLAGS (\\Answered \\Flagged \\Deleted \\Seen \\Draft)"\  "FLAGS (\\Answered \\Flagged \\Deleted \\Seen \\Draft)"\

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26