Skip to content

John McEleney / mailutils

Go to a project
Toggle navigation
Toggle navigation pinning
Commit f3e0301f f3e0301f70ea43d0e05a433e03a471da5d7c254f by Sergey Poznyakoff
Options

Test new list operations.

1 parent ac2313fa
Inline Side-by-side
Showing 1 changed file with 40 additions and 1 deletions
1 # -*- tcl -*- 1 # -*- tcl -*-
2 # This file is part of Mailutils testsuite. 2 # This file is part of Mailutils testsuite.
3 # Copyright (C) 2003, Free Software Foundation 3 # Copyright (C) 2003, 2005 Free Software Foundation
4 # 4 #
5 # This program is free software; you can redistribute it and/or modify 5 # This program is free software; you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by 6 # it under the terms of the GNU General Public License as published by
...@@ -107,6 +107,45 @@ mailbox_prog_test "iter 1" ...@@ -107,6 +107,45 @@ mailbox_prog_test "iter 1"
107 prompt_text "3" 107 prompt_text "3"
108 mailbox_prog_test "next 2" 108 mailbox_prog_test "next 2"
109 109
110 mailbox_prog_command "ins jeden un"
111 mailbox_prog_test "print" \
112 "3" \
113 "dwa" \
114 "jeden" \
115 "un" \
116 "en" \
117 "to" \
118 "fem"
119
120 mailbox_prog_command "ins before jeden zero"
121 mailbox_prog_test "print" \
122 "3" \
123 "dwa" \
124 "zero" \
125 "jeden" \
126 "un" \
127 "en" \
128 "to" \
129 "fem"
130
131 prompt_text "un"
132 mailbox_prog_test "find un"
133
134 mailbox_prog_command "ins before un cero"
135 mailbox_prog_command "ins un dos"
136
137 mailbox_prog_test "print" \
138 "3" \
139 "dwa" \
140 "zero" \
141 "jeden" \
142 "cero" \
143 "un" \
144 "dos" \
145 "en" \
146 "to" \
147 "fem"
148
110 mailbox_prog_send "quit" 149 mailbox_prog_send "quit"
111 mailbox_prog_stop 150 mailbox_prog_stop
112 151
......