summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2005-07-26 06:26:16 +0000
committerSergey Poznyakoff <gray@gnu.org.ua>2005-07-26 06:26:16 +0000
commitf3e0301f70ea43d0e05a433e03a471da5d7c254f (patch)
tree77e6f58780f299b8123460af1f140fb018a0c492
parentac2313faf9050f41f6788ae3904aa59e6b40a42a (diff)
downloadmailutils-f3e0301f70ea43d0e05a433e03a471da5d7c254f.tar.gz
mailutils-f3e0301f70ea43d0e05a433e03a471da5d7c254f.tar.bz2
Test new list operations.
-rw-r--r--mailbox/testsuite/mailbox/list.exp41
1 files changed, 40 insertions, 1 deletions
diff --git a/mailbox/testsuite/mailbox/list.exp b/mailbox/testsuite/mailbox/list.exp
index 911205009..6c15b1425 100644
--- a/mailbox/testsuite/mailbox/list.exp
+++ b/mailbox/testsuite/mailbox/list.exp
@@ -1,6 +1,6 @@
# -*- tcl -*-
# This file is part of Mailutils testsuite.
-# Copyright (C) 2003, Free Software Foundation
+# Copyright (C) 2003, 2005 Free Software Foundation
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -107,6 +107,45 @@ mailbox_prog_test "iter 1"
prompt_text "3"
mailbox_prog_test "next 2"
+mailbox_prog_command "ins jeden un"
+mailbox_prog_test "print" \
+ "3" \
+ "dwa" \
+ "jeden" \
+ "un" \
+ "en" \
+ "to" \
+ "fem"
+
+mailbox_prog_command "ins before jeden zero"
+mailbox_prog_test "print" \
+ "3" \
+ "dwa" \
+ "zero" \
+ "jeden" \
+ "un" \
+ "en" \
+ "to" \
+ "fem"
+
+prompt_text "un"
+mailbox_prog_test "find un"
+
+mailbox_prog_command "ins before un cero"
+mailbox_prog_command "ins un dos"
+
+mailbox_prog_test "print" \
+ "3" \
+ "dwa" \
+ "zero" \
+ "jeden" \
+ "cero" \
+ "un" \
+ "dos" \
+ "en" \
+ "to" \
+ "fem"
+
mailbox_prog_send "quit"
mailbox_prog_stop

Return to:

Send suggestions and report system problems to the System administrator.