Added new testsuites
Showing
21 changed files
with
728 additions
and
0 deletions
| ... | @@ -487,18 +487,22 @@ AC_CONFIG_FILES([Makefile mailutils.spec | ... | @@ -487,18 +487,22 @@ AC_CONFIG_FILES([Makefile mailutils.spec |
| 487 | imap4d/Makefile | 487 | imap4d/Makefile |
| 488 | imap4d/testsuite/Makefile | 488 | imap4d/testsuite/Makefile |
| 489 | from/Makefile | 489 | from/Makefile |
| 490 | from/testsuite/Makefile | ||
| 490 | mail/Makefile | 491 | mail/Makefile |
| 491 | mail/testsuite/Makefile | 492 | mail/testsuite/Makefile |
| 492 | pop3d/Makefile | 493 | pop3d/Makefile |
| 493 | pop3d/testsuite/Makefile | 494 | pop3d/testsuite/Makefile |
| 494 | frm/Makefile | 495 | frm/Makefile |
| 496 | frm/testsuite/Makefile | ||
| 495 | sieve/Makefile | 497 | sieve/Makefile |
| 496 | messages/Makefile | 498 | messages/Makefile |
| 499 | messages/testsuite/Makefile | ||
| 497 | scripts/Makefile | 500 | scripts/Makefile |
| 498 | libmu_scm/Makefile | 501 | libmu_scm/Makefile |
| 499 | guimb/Makefile | 502 | guimb/Makefile |
| 500 | guimb/scm/Makefile | 503 | guimb/scm/Makefile |
| 501 | readmsg/Makefile | 504 | readmsg/Makefile |
| 505 | readmsg/testsuite/Makefile | ||
| 502 | comsat/Makefile | 506 | comsat/Makefile |
| 503 | mail.local/Makefile | 507 | mail.local/Makefile |
| 504 | mail.remote/Makefile | 508 | mail.remote/Makefile | ... | ... |
frm/testsuite/.cvsignore
0 → 100644
frm/testsuite/Makefile.am
0 → 100644
| 1 | AUTOMAKE_OPTIONS = dejagnu | ||
| 2 | DEJATOOL = frm | ||
| 3 | RUNTESTFLAGS = | ||
| 4 | CLEANFILES = *.log | ||
| 5 | test_dirs = frm | ||
| 6 | |||
| 7 | dist-hook: | ||
| 8 | here=`cd $(top_builddir)/$(subdir) && pwd`; \ | ||
| 9 | srcdir=`cd $(srcdir) && pwd`; \ | ||
| 10 | distdir=`cd $(distdir) && pwd`; \ | ||
| 11 | for dir in $(test_dirs); \ | ||
| 12 | do \ | ||
| 13 | cd $$srcdir;\ | ||
| 14 | mkdir $$distdir/$$dir;\ | ||
| 15 | cd $$dir;\ | ||
| 16 | for file in DISTFILES `cat DISTFILES`; do \ | ||
| 17 | d=$$srcdir/$$dir; \ | ||
| 18 | if test -d $$d/$$file; then \ | ||
| 19 | cp -pr $$d/$$file $$distdir/$$dir/$$file; \ | ||
| 20 | else \ | ||
| 21 | test -f $$distdir/$$dir/$$file \ | ||
| 22 | || cp -p $$d/$$file $$distdir/$$dir/$$file || exit; \ | ||
| 23 | fi; \ | ||
| 24 | done;\ | ||
| 25 | done;\ | ||
| 26 | cd $$here | ||
| 27 | |||
| 28 | site.exp: Makefile remote.exp | ||
| 29 | @echo 'Making a new site.exp file...' | ||
| 30 | @test ! -f site.bak || rm -f site.bak | ||
| 31 | @echo '## these variables are automatically generated by make ##' > $@-t | ||
| 32 | @echo '# Do not edit here. If you wish to override these values' >> $@-t | ||
| 33 | @echo '# edit the last section' >> $@-t | ||
| 34 | @echo 'set tool $(DEJATOOL)' >> $@-t | ||
| 35 | @echo "set top_srcdir `cd $(top_srcdir); pwd`" >> $@-t | ||
| 36 | @echo "set srcdir `cd $(srcdir); pwd`" >> $@-t | ||
| 37 | @echo 'set objdir' `pwd` >> $@-t | ||
| 38 | @echo 'set host_alias "$(host_alias)"' >> $@-t | ||
| 39 | @echo 'set host_triplet $(host_triplet)' >> $@-t | ||
| 40 | @echo 'set target_alias "$(target_alias)"' >> $@-t | ||
| 41 | @echo 'set target_triplet $(target_triplet)' >> $@-t | ||
| 42 | @echo 'set build_alias "$(build_alias)"' >> $@-t | ||
| 43 | @echo 'set build_triplet $(build_triplet)' >> $@-t | ||
| 44 | @echo '## All variables above are generated by configure. Do Not Edit ##' >> $@-t | ||
| 45 | @test ! -f site.exp || sed '1,/^## All variables above are.*##/ d' site.exp >> $@-t | ||
| 46 | @test ! -f site.exp || mv site.exp site.bak | ||
| 47 | @mv $@-t site.exp | ||
| 48 | |||
| 49 | remote.exp:; | ||
| 50 | @echo 'Making a new remote.exp file...' | ||
| 51 | @test ! -f remote.bak || rm -f remote.bak | ||
| 52 | @echo '## These variables are used to set up for the remote testing.' >> $@-t | ||
| 53 | @echo '## Please, read file README in this directory for instructions' >> $@-t | ||
| 54 | @echo '## on how to use this file' >> $@-t | ||
| 55 | @echo "set host_board `hostname`" >> $@-t | ||
| 56 | @echo 'set board_info($$host_board,connect) rlogin' >> $@-t | ||
| 57 | @echo 'set board_info($$host_board,shell_prompt) "\\$$ "' >> $@-t | ||
| 58 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 59 | @echo "set board_info(\$$host_board,srcdir) `cd $(srcdir); pwd`" >> $@-t | ||
| 60 | @echo "set board_info(\$$host_board,objdir) `pwd`" >> $@-t | ||
| 61 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 62 | @echo "set board_info(\$$host_board,top_builddir) `cd $(top_builddir); pwd`" >> $@-t | ||
| 63 | @test ! -f remote.exp || mv remote.exp remote.bak | ||
| 64 | @mv $@-t remote.exp | ||
| 65 | |||
| 66 | |||
| 67 | DISTCLEANFILES=*.exp *.log *.sum | ||
| 68 | |||
| 69 | distclean-local: | ||
| 70 | -rm -rf data |
frm/testsuite/frm/DISTFILES
0 → 100644
| 1 | test.exp | ||
| ... | \ No newline at end of file | ... | \ No newline at end of file |
frm/testsuite/frm/test.exp
0 → 100644
| 1 | # -*- tcl -*- | ||
| 2 | # This file is part of Mailutils testsuite. | ||
| 3 | # Copyright (C) 2002, Free Software Foundation | ||
| 4 | # | ||
| 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 | ||
| 7 | # the Free Software Foundation; either version 2 of the License, or | ||
| 8 | # (at your option) any later version. | ||
| 9 | # | ||
| 10 | # This program is distributed in the hope that it will be useful, | ||
| 11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 13 | # GNU General Public License for more details. | ||
| 14 | # | ||
| 15 | # You should have received a copy of the GNU General Public License | ||
| 16 | # along with this program; if not, write to the Free Software Foundation, | ||
| 17 | # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | ||
| 18 | |||
| 19 | source $top_srcdir/testsuite/lib/mailutils.exp | ||
| 20 | |||
| 21 | mu_init | ||
| 22 | set env(MAIL) $MU_SPOOL_DIR/mbox1 | ||
| 23 | |||
| 24 | mu_prepare_spools | ||
| 25 | |||
| 26 | mu_exec -retcode 1 -message "frm" "Foo Bar\tJabberwocky"\ | ||
| 27 | "Bar\tRe: Jabberwocky"\ | ||
| 28 | "Sergey Poznyakoff\tSimple MIME"\ | ||
| 29 | "Sergey Poznyakoff\tNested MIME" | ||
| 30 | |||
| 31 | mu_exec -retcode 1 -message "frm -n" -arg -n \ | ||
| 32 | "1: Foo Bar\tJabberwocky"\ | ||
| 33 | "2: Bar\tRe: Jabberwocky"\ | ||
| 34 | "3: Sergey Poznyakoff\tSimple MIME"\ | ||
| 35 | "4: Sergey Poznyakoff\tNested MIME" | ||
| 36 | |||
| 37 | mu_exec -retcode 1 -message "frm -l" -arg -l \ | ||
| 38 | "(Bar) Foo Bar\tJabberwocky"\ | ||
| 39 | "(Foo Bar) Bar\tRe: Jabberwocky"\ | ||
| 40 | "(Foo Bar) Sergey Poznyakoff\tSimple MIME"\ | ||
| 41 | "(Foo Bar) Sergey Poznyakoff\tNested MIME"\ | ||
| 42 | |||
| 43 | mu_exec -retcode 1 -message "frm -qS" -arg -qS \ | ||
| 44 | "You have 4 messages" | ||
| 45 | |||
| 46 | mu_exec -retcode 1 -arg %mbox -message "frm %mbox" \ | ||
| 47 | "Sergey Poznyakoff\tMBOX" | ||
| 48 | |||
| 49 | mu_exec -retcode 1 -arg -q -message "frm -q" | ||
| 50 | |||
| 51 | mu_exec -arg -q -arg %nonexistent -retcode 2 -message "frm -q %nonexistent" | ||
| 52 | |||
| 53 | #end of test.exp | ||
| ... | \ No newline at end of file | ... | \ No newline at end of file |
from/testsuite/.cvsignore
0 → 100644
from/testsuite/Makefile.am
0 → 100644
| 1 | AUTOMAKE_OPTIONS = dejagnu | ||
| 2 | DEJATOOL = from | ||
| 3 | RUNTESTFLAGS = | ||
| 4 | CLEANFILES = *.log | ||
| 5 | test_dirs = from | ||
| 6 | |||
| 7 | dist-hook: | ||
| 8 | here=`cd $(top_builddir)/$(subdir) && pwd`; \ | ||
| 9 | srcdir=`cd $(srcdir) && pwd`; \ | ||
| 10 | distdir=`cd $(distdir) && pwd`; \ | ||
| 11 | for dir in $(test_dirs); \ | ||
| 12 | do \ | ||
| 13 | cd $$srcdir;\ | ||
| 14 | mkdir $$distdir/$$dir;\ | ||
| 15 | cd $$dir;\ | ||
| 16 | for file in DISTFILES `cat DISTFILES`; do \ | ||
| 17 | d=$$srcdir/$$dir; \ | ||
| 18 | if test -d $$d/$$file; then \ | ||
| 19 | cp -pr $$d/$$file $$distdir/$$dir/$$file; \ | ||
| 20 | else \ | ||
| 21 | test -f $$distdir/$$dir/$$file \ | ||
| 22 | || cp -p $$d/$$file $$distdir/$$dir/$$file || exit; \ | ||
| 23 | fi; \ | ||
| 24 | done;\ | ||
| 25 | done;\ | ||
| 26 | cd $$here | ||
| 27 | |||
| 28 | site.exp: Makefile remote.exp | ||
| 29 | @echo 'Making a new site.exp file...' | ||
| 30 | @test ! -f site.bak || rm -f site.bak | ||
| 31 | @echo '## these variables are automatically generated by make ##' > $@-t | ||
| 32 | @echo '# Do not edit here. If you wish to override these values' >> $@-t | ||
| 33 | @echo '# edit the last section' >> $@-t | ||
| 34 | @echo 'set tool $(DEJATOOL)' >> $@-t | ||
| 35 | @echo "set top_srcdir `cd $(top_srcdir); pwd`" >> $@-t | ||
| 36 | @echo "set srcdir `cd $(srcdir); pwd`" >> $@-t | ||
| 37 | @echo 'set objdir' `pwd` >> $@-t | ||
| 38 | @echo 'set host_alias "$(host_alias)"' >> $@-t | ||
| 39 | @echo 'set host_triplet $(host_triplet)' >> $@-t | ||
| 40 | @echo 'set target_alias "$(target_alias)"' >> $@-t | ||
| 41 | @echo 'set target_triplet $(target_triplet)' >> $@-t | ||
| 42 | @echo 'set build_alias "$(build_alias)"' >> $@-t | ||
| 43 | @echo 'set build_triplet $(build_triplet)' >> $@-t | ||
| 44 | @echo '## All variables above are generated by configure. Do Not Edit ##' >> $@-t | ||
| 45 | @test ! -f site.exp || sed '1,/^## All variables above are.*##/ d' site.exp >> $@-t | ||
| 46 | @test ! -f site.exp || mv site.exp site.bak | ||
| 47 | @mv $@-t site.exp | ||
| 48 | |||
| 49 | remote.exp:; | ||
| 50 | @echo 'Making a new remote.exp file...' | ||
| 51 | @test ! -f remote.bak || rm -f remote.bak | ||
| 52 | @echo '## These variables are used to set up for the remote testing.' >> $@-t | ||
| 53 | @echo '## Please, read file README in this directory for instructions' >> $@-t | ||
| 54 | @echo '## on how to use this file' >> $@-t | ||
| 55 | @echo "set host_board `hostname`" >> $@-t | ||
| 56 | @echo 'set board_info($$host_board,connect) rlogin' >> $@-t | ||
| 57 | @echo 'set board_info($$host_board,shell_prompt) "\\$$ "' >> $@-t | ||
| 58 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 59 | @echo "set board_info(\$$host_board,srcdir) `cd $(srcdir); pwd`" >> $@-t | ||
| 60 | @echo "set board_info(\$$host_board,objdir) `pwd`" >> $@-t | ||
| 61 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 62 | @echo "set board_info(\$$host_board,top_builddir) `cd $(top_builddir); pwd`" >> $@-t | ||
| 63 | @test ! -f remote.exp || mv remote.exp remote.bak | ||
| 64 | @mv $@-t remote.exp | ||
| 65 | |||
| 66 | |||
| 67 | DISTCLEANFILES=*.exp *.log *.sum | ||
| 68 | |||
| 69 | distclean-local: | ||
| 70 | -rm -rf data |
from/testsuite/from/DISTFILES
0 → 100644
| 1 | test.exp |
from/testsuite/from/test.exp
0 → 100644
| 1 | # -*- tcl -*- | ||
| 2 | # This file is part of Mailutils testsuite. | ||
| 3 | # Copyright (C) 2002, Free Software Foundation | ||
| 4 | # | ||
| 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 | ||
| 7 | # the Free Software Foundation; either version 2 of the License, or | ||
| 8 | # (at your option) any later version. | ||
| 9 | # | ||
| 10 | # This program is distributed in the hope that it will be useful, | ||
| 11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 13 | # GNU General Public License for more details. | ||
| 14 | # | ||
| 15 | # You should have received a copy of the GNU General Public License | ||
| 16 | # along with this program; if not, write to the Free Software Foundation, | ||
| 17 | # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | ||
| 18 | |||
| 19 | source $top_srcdir/testsuite/lib/mailutils.exp | ||
| 20 | |||
| 21 | mu_init | ||
| 22 | set env(MAIL) $MU_SPOOL_DIR/mbox1 | ||
| 23 | |||
| 24 | mu_prepare_spools | ||
| 25 | |||
| 26 | mu_exec -message "from" \ | ||
| 27 | "Foo Bar\tJabberwocky"\ | ||
| 28 | "Bar\tRe: Jabberwocky"\ | ||
| 29 | "Sergey Poznyakoff\tSimple MIME"\ | ||
| 30 | "Sergey Poznyakoff\tNested MIME" | ||
| 31 | |||
| 32 | mu_exec -message "from mbox" -arg %mbox \ | ||
| 33 | "Sergey Poznyakoff\tMBOX" | ||
| 34 | |||
| 35 | #end of test.exp |
messages/testsuite/.cvsignore
0 → 100644
messages/testsuite/Makefile.am
0 → 100644
| 1 | AUTOMAKE_OPTIONS = dejagnu | ||
| 2 | DEJATOOL = messages | ||
| 3 | RUNTESTFLAGS = | ||
| 4 | CLEANFILES = *.log | ||
| 5 | test_dirs = messages | ||
| 6 | |||
| 7 | dist-hook: | ||
| 8 | here=`cd $(top_builddir)/$(subdir) && pwd`; \ | ||
| 9 | srcdir=`cd $(srcdir) && pwd`; \ | ||
| 10 | distdir=`cd $(distdir) && pwd`; \ | ||
| 11 | for dir in $(test_dirs); \ | ||
| 12 | do \ | ||
| 13 | cd $$srcdir;\ | ||
| 14 | mkdir $$distdir/$$dir;\ | ||
| 15 | cd $$dir;\ | ||
| 16 | for file in DISTFILES `cat DISTFILES`; do \ | ||
| 17 | d=$$srcdir/$$dir; \ | ||
| 18 | if test -d $$d/$$file; then \ | ||
| 19 | cp -pr $$d/$$file $$distdir/$$dir/$$file; \ | ||
| 20 | else \ | ||
| 21 | test -f $$distdir/$$dir/$$file \ | ||
| 22 | || cp -p $$d/$$file $$distdir/$$dir/$$file || exit; \ | ||
| 23 | fi; \ | ||
| 24 | done;\ | ||
| 25 | done;\ | ||
| 26 | cd $$here | ||
| 27 | |||
| 28 | site.exp: Makefile remote.exp | ||
| 29 | @echo 'Making a new site.exp file...' | ||
| 30 | @test ! -f site.bak || rm -f site.bak | ||
| 31 | @echo '## these variables are automatically generated by make ##' > $@-t | ||
| 32 | @echo '# Do not edit here. If you wish to override these values' >> $@-t | ||
| 33 | @echo '# edit the last section' >> $@-t | ||
| 34 | @echo 'set tool $(DEJATOOL)' >> $@-t | ||
| 35 | @echo "set top_srcdir `cd $(top_srcdir); pwd`" >> $@-t | ||
| 36 | @echo "set srcdir `cd $(srcdir); pwd`" >> $@-t | ||
| 37 | @echo 'set objdir' `pwd` >> $@-t | ||
| 38 | @echo 'set host_alias "$(host_alias)"' >> $@-t | ||
| 39 | @echo 'set host_triplet $(host_triplet)' >> $@-t | ||
| 40 | @echo 'set target_alias "$(target_alias)"' >> $@-t | ||
| 41 | @echo 'set target_triplet $(target_triplet)' >> $@-t | ||
| 42 | @echo 'set build_alias "$(build_alias)"' >> $@-t | ||
| 43 | @echo 'set build_triplet $(build_triplet)' >> $@-t | ||
| 44 | @echo '## All variables above are generated by configure. Do Not Edit ##' >> $@-t | ||
| 45 | @test ! -f site.exp || sed '1,/^## All variables above are.*##/ d' site.exp >> $@-t | ||
| 46 | @test ! -f site.exp || mv site.exp site.bak | ||
| 47 | @mv $@-t site.exp | ||
| 48 | |||
| 49 | remote.exp:; | ||
| 50 | @echo 'Making a new remote.exp file...' | ||
| 51 | @test ! -f remote.bak || rm -f remote.bak | ||
| 52 | @echo '## These variables are used to set up for the remote testing.' >> $@-t | ||
| 53 | @echo '## Please, read file README in this directory for instructions' >> $@-t | ||
| 54 | @echo '## on how to use this file' >> $@-t | ||
| 55 | @echo "set host_board `hostname`" >> $@-t | ||
| 56 | @echo 'set board_info($$host_board,connect) rlogin' >> $@-t | ||
| 57 | @echo 'set board_info($$host_board,shell_prompt) "\\$$ "' >> $@-t | ||
| 58 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 59 | @echo "set board_info(\$$host_board,srcdir) `cd $(srcdir); pwd`" >> $@-t | ||
| 60 | @echo "set board_info(\$$host_board,objdir) `pwd`" >> $@-t | ||
| 61 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 62 | @echo "set board_info(\$$host_board,top_builddir) `cd $(top_builddir); pwd`" >> $@-t | ||
| 63 | @test ! -f remote.exp || mv remote.exp remote.bak | ||
| 64 | @mv $@-t remote.exp | ||
| 65 | |||
| 66 | |||
| 67 | DISTCLEANFILES=*.exp *.log *.sum | ||
| 68 | |||
| 69 | distclean-local: | ||
| 70 | -rm -rf data |
messages/testsuite/messages/DISTFILES
0 → 100644
| 1 | test.exp |
messages/testsuite/messages/test.exp
0 → 100644
| 1 | # -*- tcl -*- | ||
| 2 | # This file is part of Mailutils testsuite. | ||
| 3 | # Copyright (C) 2002, Free Software Foundation | ||
| 4 | # | ||
| 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 | ||
| 7 | # the Free Software Foundation; either version 2 of the License, or | ||
| 8 | # (at your option) any later version. | ||
| 9 | # | ||
| 10 | # This program is distributed in the hope that it will be useful, | ||
| 11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 13 | # GNU General Public License for more details. | ||
| 14 | # | ||
| 15 | # You should have received a copy of the GNU General Public License | ||
| 16 | # along with this program; if not, write to the Free Software Foundation, | ||
| 17 | # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | ||
| 18 | |||
| 19 | source $top_srcdir/testsuite/lib/mailutils.exp | ||
| 20 | |||
| 21 | mu_init | ||
| 22 | set env(MAIL) $MU_SPOOL_DIR/mbox1 | ||
| 23 | |||
| 24 | mu_prepare_spools | ||
| 25 | |||
| 26 | mu_exec -message "messages" \ | ||
| 27 | "Number of messages in $MU_SPOOL_DIR/mbox1: 4" | ||
| 28 | |||
| 29 | mu_exec -message "messages -q" -arg -q "4" | ||
| 30 | |||
| 31 | mu_exec -message "messages %teaparty.mbox" -arg %teaparty.mbox \ | ||
| 32 | "Number of messages in $MU_SPOOL_DIR/teaparty.mbox: 95" | ||
| 33 | |||
| 34 | #end of test.exp | ||
| 35 | |||
| ... | \ No newline at end of file | ... | \ No newline at end of file |
readmsg/testsuite/.cvsignore
0 → 100644
readmsg/testsuite/Makefile.am
0 → 100644
| 1 | AUTOMAKE_OPTIONS = dejagnu | ||
| 2 | DEJATOOL = readmsg | ||
| 3 | RUNTESTFLAGS = | ||
| 4 | CLEANFILES = *.log | ||
| 5 | test_dirs = readmsg | ||
| 6 | |||
| 7 | dist-hook: | ||
| 8 | here=`cd $(top_builddir)/$(subdir) && pwd`; \ | ||
| 9 | srcdir=`cd $(srcdir) && pwd`; \ | ||
| 10 | distdir=`cd $(distdir) && pwd`; \ | ||
| 11 | for dir in $(test_dirs); \ | ||
| 12 | do \ | ||
| 13 | cd $$srcdir;\ | ||
| 14 | mkdir $$distdir/$$dir;\ | ||
| 15 | cd $$dir;\ | ||
| 16 | for file in DISTFILES `cat DISTFILES`; do \ | ||
| 17 | d=$$srcdir/$$dir; \ | ||
| 18 | if test -d $$d/$$file; then \ | ||
| 19 | cp -pr $$d/$$file $$distdir/$$dir/$$file; \ | ||
| 20 | else \ | ||
| 21 | test -f $$distdir/$$dir/$$file \ | ||
| 22 | || cp -p $$d/$$file $$distdir/$$dir/$$file || exit; \ | ||
| 23 | fi; \ | ||
| 24 | done;\ | ||
| 25 | done;\ | ||
| 26 | cd $$here | ||
| 27 | |||
| 28 | site.exp: Makefile remote.exp | ||
| 29 | @echo 'Making a new site.exp file...' | ||
| 30 | @test ! -f site.bak || rm -f site.bak | ||
| 31 | @echo '## these variables are automatically generated by make ##' > $@-t | ||
| 32 | @echo '# Do not edit here. If you wish to override these values' >> $@-t | ||
| 33 | @echo '# edit the last section' >> $@-t | ||
| 34 | @echo 'set tool $(DEJATOOL)' >> $@-t | ||
| 35 | @echo "set top_srcdir `cd $(top_srcdir); pwd`" >> $@-t | ||
| 36 | @echo "set srcdir `cd $(srcdir); pwd`" >> $@-t | ||
| 37 | @echo 'set objdir' `pwd` >> $@-t | ||
| 38 | @echo 'set host_alias "$(host_alias)"' >> $@-t | ||
| 39 | @echo 'set host_triplet $(host_triplet)' >> $@-t | ||
| 40 | @echo 'set target_alias "$(target_alias)"' >> $@-t | ||
| 41 | @echo 'set target_triplet $(target_triplet)' >> $@-t | ||
| 42 | @echo 'set build_alias "$(build_alias)"' >> $@-t | ||
| 43 | @echo 'set build_triplet $(build_triplet)' >> $@-t | ||
| 44 | @echo '## All variables above are generated by configure. Do Not Edit ##' >> $@-t | ||
| 45 | @test ! -f site.exp || sed '1,/^## All variables above are.*##/ d' site.exp >> $@-t | ||
| 46 | @test ! -f site.exp || mv site.exp site.bak | ||
| 47 | @mv $@-t site.exp | ||
| 48 | |||
| 49 | remote.exp:; | ||
| 50 | @echo 'Making a new remote.exp file...' | ||
| 51 | @test ! -f remote.bak || rm -f remote.bak | ||
| 52 | @echo '## These variables are used to set up for the remote testing.' >> $@-t | ||
| 53 | @echo '## Please, read file README in this directory for instructions' >> $@-t | ||
| 54 | @echo '## on how to use this file' >> $@-t | ||
| 55 | @echo "set host_board `hostname`" >> $@-t | ||
| 56 | @echo 'set board_info($$host_board,connect) rlogin' >> $@-t | ||
| 57 | @echo 'set board_info($$host_board,shell_prompt) "\\$$ "' >> $@-t | ||
| 58 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 59 | @echo "set board_info(\$$host_board,srcdir) `cd $(srcdir); pwd`" >> $@-t | ||
| 60 | @echo "set board_info(\$$host_board,objdir) `pwd`" >> $@-t | ||
| 61 | @echo "set board_info(\$$host_board,top_srcdir) `cd $(top_srcdir); pwd`" >> $@-t | ||
| 62 | @echo "set board_info(\$$host_board,top_builddir) `cd $(top_builddir); pwd`" >> $@-t | ||
| 63 | @test ! -f remote.exp || mv remote.exp remote.bak | ||
| 64 | @mv $@-t remote.exp | ||
| 65 | |||
| 66 | |||
| 67 | DISTCLEANFILES=*.exp *.log *.sum | ||
| 68 | |||
| 69 | distclean-local: | ||
| 70 | -rm -rf data |
readmsg/testsuite/readmsg/DISTFILES
0 → 100644
| 1 | test.exp |
readmsg/testsuite/readmsg/test.exp
0 → 100644
| 1 | # -*- tcl -*- | ||
| 2 | # This file is part of Mailutils testsuite. | ||
| 3 | # Copyright (C) 2002, Free Software Foundation | ||
| 4 | # | ||
| 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 | ||
| 7 | # the Free Software Foundation; either version 2 of the License, or | ||
| 8 | # (at your option) any later version. | ||
| 9 | # | ||
| 10 | # This program is distributed in the hope that it will be useful, | ||
| 11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 13 | # GNU General Public License for more details. | ||
| 14 | # | ||
| 15 | # You should have received a copy of the GNU General Public License | ||
| 16 | # along with this program; if not, write to the Free Software Foundation, | ||
| 17 | # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | ||
| 18 | |||
| 19 | source $top_srcdir/testsuite/lib/mailutils.exp | ||
| 20 | |||
| 21 | mu_init | ||
| 22 | set env(MAIL) $MU_SPOOL_DIR/mbox1 | ||
| 23 | |||
| 24 | mu_prepare_spools | ||
| 25 | |||
| 26 | mu_exec -message "readmsg *" -arg "\\\\*" \ | ||
| 27 | "Date: Fri, 28 Dec 2001 22:18:08 +0200"\ | ||
| 28 | "From: Foo Bar <foobar@nonexistent.net>"\ | ||
| 29 | "To: Bar <bar@dontmailme.org>"\ | ||
| 30 | "Subject: Jabberwocky"\ | ||
| 31 | ""\ | ||
| 32 | "`Twas brillig, and the slithy toves"\ | ||
| 33 | "Did gyre and gimble in the wabe;"\ | ||
| 34 | "All mimsy were the borogoves,"\ | ||
| 35 | "And the mome raths outgrabe."\ | ||
| 36 | ""\ | ||
| 37 | "`Beware the Jabberwock, my son!"\ | ||
| 38 | "The jaws that bite, the claws that catch!"\ | ||
| 39 | "Beware the Jujub bird, and shun"\ | ||
| 40 | "The frumious Bandersnatch!'"\ | ||
| 41 | ""\ | ||
| 42 | "He took his vorpal sword in hand:"\ | ||
| 43 | "Long time the manxome foe he sought --"\ | ||
| 44 | "So rested he by the Tumtum gree,"\ | ||
| 45 | "And stood awhile in thought."\ | ||
| 46 | ""\ | ||
| 47 | "And as in uffish thought he stood,"\ | ||
| 48 | "The Jabberwock, with eyes of flame,"\ | ||
| 49 | "Came whiffling through the tulgey wook,"\ | ||
| 50 | "And burbled as it came!"\ | ||
| 51 | ""\ | ||
| 52 | "One, two! One, two! And through and through"\ | ||
| 53 | "The vorpal blade went snicker-snack!"\ | ||
| 54 | "He left it dead, and with its head"\ | ||
| 55 | "He went galumphing back."\ | ||
| 56 | ""\ | ||
| 57 | "`And has thou slain the Jabberwock?"\ | ||
| 58 | "Come to my arms, my beamish boy!"\ | ||
| 59 | "O frabjous day! Calloh! Callay!"\ | ||
| 60 | "He chortled in his joy."\ | ||
| 61 | ""\ | ||
| 62 | "`Twas brillig, and the slithy toves"\ | ||
| 63 | "Did gyre and gimble in the wabe;"\ | ||
| 64 | "All mimsy were the borogoves,"\ | ||
| 65 | "And the mome raths outgrabe."\ | ||
| 66 | ""\ | ||
| 67 | ""\ | ||
| 68 | "Date: Fri, 28 Dec 2001 23:28:08 +0200"\ | ||
| 69 | "From: Bar <bar@dontmailme.org>"\ | ||
| 70 | "To: Foo Bar <foobar@nonexistent.net>"\ | ||
| 71 | "Subject: Re: Jabberwocky"\ | ||
| 72 | ""\ | ||
| 73 | "It seems very pretty, but it's *rather* hard to understand!'"\ | ||
| 74 | "Somehow it seems to fill my head with ideas -- only I don't"\ | ||
| 75 | "exactly know what they are! However, SOMEBODY killed SOMETHING:"\ | ||
| 76 | "that's clear, at any rate..."\ | ||
| 77 | ""\ | ||
| 78 | "To: Foo Bar <foobar@nonexistent.net>"\ | ||
| 79 | "Subject: Simple MIME"\ | ||
| 80 | "Date: Sat, 13 Jul 2002 00:43:18 +0300"\ | ||
| 81 | "From: Sergey Poznyakoff <gray@Mirddin.farlep.net>"\ | ||
| 82 | ""\ | ||
| 83 | -- "------- =_aaaaaaaaaa0"\ | ||
| 84 | "Content-Type: text/plain; name=\"msg.1\"; charset=\"us-ascii\""\ | ||
| 85 | "Content-ID: <5082.1026510189.1@Mirddin.farlep.net>"\ | ||
| 86 | "Content-Description: How doth"\ | ||
| 87 | ""\ | ||
| 88 | "How doth the little crocodile"\ | ||
| 89 | "Improve his shining tail,"\ | ||
| 90 | "And pour the waters of the Nile"\ | ||
| 91 | "On every golden scale!"\ | ||
| 92 | ""\ | ||
| 93 | "`How cheerfully he seems to grin,"\ | ||
| 94 | "How neatly spread his claws,"\ | ||
| 95 | "And welcome little fishes in"\ | ||
| 96 | "With gently smiling jaws!"\ | ||
| 97 | ""\ | ||
| 98 | -- "------- =_aaaaaaaaaa0"\ | ||
| 99 | "Content-Type: application/octet-stream; name=\"msg.21\""\ | ||
| 100 | "Content-ID: <5082.1026510189.2@Mirddin.farlep.net>"\ | ||
| 101 | "Content-Description: Father William Part I"\ | ||
| 102 | "Content-Transfer-Encoding: base64"\ | ||
| 103 | ""\ | ||
| 104 | "YFlvdSBhcmUgb2xkLCBGYXRoZXIgV2lsbGlhbSwnIHRoZSB5b3VuZyBtYW4gc2FpZCwKYEFuZCB5"\ | ||
| 105 | "b3VyIGhhaXIgaGFzIGJlY29tZSB2ZXJ5IHdoaXRlOwpBbmQgeWV0IHlvdSBpbmNlc3NhbnRseSBz"\ | ||
| 106 | "dGFuZCBvbiB5b3VyIGhlYWQtLQpEbyB5b3UgdGhpbmssIGF0IHlvdXIgYWdlLCBpdCBpcyByaWdo"\ | ||
| 107 | "dD8nCgpgSW4gbXkgeW91dGgsJyBGYXRoZXIgV2lsbGlhbSByZXBsaWVkIHRvIGhpcyBzb24sCmBJ"\ | ||
| 108 | "IGZlYXJlZCBpdCBtaWdodCBpbmp1cmUgdGhlIGJyYWluOwpCdXQsIG5vdyB0aGF0IEknbSBwZXJm"\ | ||
| 109 | "ZWN0bHkgc3VyZSBJIGhhdmUgbm9uZSwKV2h5LCBJIGRvIGl0IGFnYWluIGFuZCBhZ2Fpbi4nCgo="\ | ||
| 110 | ""\ | ||
| 111 | -- "------- =_aaaaaaaaaa0--"\ | ||
| 112 | ""\ | ||
| 113 | "To: Foo Bar <foobar@nonexistent.net>"\ | ||
| 114 | "Subject: Nested MIME"\ | ||
| 115 | "Date: Sat, 13 Jul 2002 00:50:58 +0300"\ | ||
| 116 | "From: Sergey Poznyakoff <gray@Mirddin.farlep.net>"\ | ||
| 117 | ""\ | ||
| 118 | -- "------- =_aaaaaaaaaa0"\ | ||
| 119 | "Content-Type: text/plain; name=\"msg.21\"; charset=\"us-ascii\""\ | ||
| 120 | "Content-ID: <5122.1026510654.2@Mirddin.farlep.net>"\ | ||
| 121 | "Content-Description: Father William Part I"\ | ||
| 122 | ""\ | ||
| 123 | "`You are old, Father William,' the young man said,"\ | ||
| 124 | "`And your hair has become very white;"\ | ||
| 125 | "And yet you incessantly stand on your head--"\ | ||
| 126 | "Do you think, at your age, it is right?'"\ | ||
| 127 | ""\ | ||
| 128 | "`In my youth,' Father William replied to his son,"\ | ||
| 129 | "`I feared it might injure the brain;"\ | ||
| 130 | "But, now that I'm perfectly sure I have none,"\ | ||
| 131 | "Why, I do it again and again.'"\ | ||
| 132 | ""\ | ||
| 133 | ""\ | ||
| 134 | -- "------- =_aaaaaaaaaa0"\ | ||
| 135 | "Content-Type: multipart/mixed; boundary=\"----- =_aaaaaaaaaa1\""\ | ||
| 136 | "Content-ID: <5122.1026510654.3@Mirddin.farlep.net>"\ | ||
| 137 | ""\ | ||
| 138 | -- "------- =_aaaaaaaaaa1"\ | ||
| 139 | "Content-Type: application/octet-stream; name=\"msg.22\""\ | ||
| 140 | "Content-ID: <5122.1026510654.4@Mirddin.farlep.net>"\ | ||
| 141 | "Content-Description: Father William Part II"\ | ||
| 142 | "Content-Transfer-Encoding: base64"\ | ||
| 143 | ""\ | ||
| 144 | "YFlvdSBhcmUgb2xkLCcgc2FpZCB0aGUgeW91dGgsIGBhcyBJIG1lbnRpb25lZCBiZWZvcmUsCkFu"\ | ||
| 145 | "ZCBoYXZlIGdyb3duIG1vc3QgdW5jb21tb25seSBmYXQ7CllldCB5b3UgdHVybmVkIGEgYmFjay1z"\ | ||
| 146 | "b21lcnNhdWx0IGluIGF0IHRoZSBkb29yLS0KUHJheSwgd2hhdCBpcyB0aGUgcmVhc29uIG9mIHRo"\ | ||
| 147 | "YXQ/JwoKYEluIG15IHlvdXRoLCcgc2FpZCB0aGUgc2FnZSwgYXMgaGUgc2hvb2sgaGlzIGdyZXkg"\ | ||
| 148 | "bG9ja3MsCmBJIGtlcHQgYWxsIG15IGxpbWJzIHZlcnkgc3VwcGxlCkJ5IHRoZSB1c2Ugb2YgdGhp"\ | ||
| 149 | "cyBvaW50bWVudC0tb25lIHNoaWxsaW5nIHRoZSBib3gtLQpBbGxvdyBtZSB0byBzZWxsIHlvdSBh"\ | ||
| 150 | "IGNvdXBsZT8nCg=="\ | ||
| 151 | ""\ | ||
| 152 | -- "------- =_aaaaaaaaaa1"\ | ||
| 153 | "Content-Type: multipart/mixed; boundary=\"----- =_aaaaaaaaaa2\""\ | ||
| 154 | "Content-ID: <5122.1026510654.5@Mirddin.farlep.net>"\ | ||
| 155 | ""\ | ||
| 156 | -- "------- =_aaaaaaaaaa2"\ | ||
| 157 | "Content-Type: application/octet-stream; name=\"msg.23\""\ | ||
| 158 | "Content-ID: <5122.1026510654.6@Mirddin.farlep.net>"\ | ||
| 159 | "Content-Description: Father William Part III"\ | ||
| 160 | "Content-Transfer-Encoding: base64"\ | ||
| 161 | ""\ | ||
| 162 | "YFlvdSBhcmUgb2xkLCcgc2FpZCB0aGUgeW91dGgsIGBhbmQgeW91ciBqYXdzIGFyZSB0b28gd2Vh"\ | ||
| 163 | "awpGb3IgYW55dGhpbmcgdG91Z2hlciB0aGFuIHN1ZXQ7CllldCB5b3UgZmluaXNoZWQgdGhlIGdv"\ | ||
| 164 | "b3NlLCB3aXRoIHRoZSBib25lcyBhbmQgdGhlIGJlYWstLQpQcmF5IGhvdyBkaWQgeW91IG1hbmFn"\ | ||
| 165 | "ZSB0byBkbyBpdD8nCgpgSW4gbXkgeW91dGgsJyBzYWlkIGhpcyBmYXRoZXIsIGBJIHRvb2sgdG8g"\ | ||
| 166 | "dGhlIGxhdywKQW5kIGFyZ3VlZCBlYWNoIGNhc2Ugd2l0aCBteSB3aWZlOwpBbmQgdGhlIG11c2N1"\ | ||
| 167 | "bGFyIHN0cmVuZ3RoLCB3aGljaCBpdCBnYXZlIHRvIG15IGphdywKSGFzIGxhc3RlZCB0aGUgcmVz"\ | ||
| 168 | "dCBvZiBteSBsaWZlLicK"\ | ||
| 169 | ""\ | ||
| 170 | -- "------- =_aaaaaaaaaa2"\ | ||
| 171 | "Content-Type: application/octet-stream; name=\"msg.24\""\ | ||
| 172 | "Content-ID: <5122.1026510654.7@Mirddin.farlep.net>"\ | ||
| 173 | "Content-Description: Father William Part IV"\ | ||
| 174 | "Content-Transfer-Encoding: base64"\ | ||
| 175 | ""\ | ||
| 176 | "YFlvdSBhcmUgb2xkLCcgc2FpZCB0aGUgeW91dGgsIGBvbmUgd291bGQgaGFyZGx5IHN1cHBvc2UK"\ | ||
| 177 | "VGhhdCB5b3VyIGV5ZSB3YXMgYXMgc3RlYWR5IGFzIGV2ZXI7CllldCB5b3UgYmFsYW5jZWQgYW4g"\ | ||
| 178 | "ZWVsIG9uIHRoZSBlbmQgb2YgeW91ciBub3NlLS0KV2hhdCBtYWRlIHlvdSBzbyBhd2Z1bGx5IGNs"\ | ||
| 179 | "ZXZlcj8nCgpgSSBoYXZlIGFuc3dlcmVkIHRocmVlIHF1ZXN0aW9ucywgYW5kIHRoYXQgaXMgZW5v"\ | ||
| 180 | "dWdoLCcKU2FpZCBoaXMgZmF0aGVyOyBgZG9uJ3QgZ2l2ZSB5b3Vyc2VsZiBhaXJzIQpEbyB5b3Ug"\ | ||
| 181 | "dGhpbmsgSSBjYW4gbGlzdGVuIGFsbCBkYXkgdG8gc3VjaCBzdHVmZj8KQmUgb2ZmLCBvciBJJ2xs"\ | ||
| 182 | "IGtpY2sgeW91IGRvd24gc3RhaXJzIScK"\ | ||
| 183 | ""\ | ||
| 184 | -- "------- =_aaaaaaaaaa2--"\ | ||
| 185 | ""\ | ||
| 186 | -- "------- =_aaaaaaaaaa1--"\ | ||
| 187 | ""\ | ||
| 188 | -- "------- =_aaaaaaaaaa0--"\ | ||
| 189 | ""\ | ||
| 190 | "" | ||
| 191 | |||
| 192 | mu_exec -message "readmsg 1 2" -arg 1 -arg 2 \ | ||
| 193 | "Date: Fri, 28 Dec 2001 22:18:08 +0200"\ | ||
| 194 | "From: Foo Bar <foobar@nonexistent.net>"\ | ||
| 195 | "To: Bar <bar@dontmailme.org>"\ | ||
| 196 | "Subject: Jabberwocky"\ | ||
| 197 | ""\ | ||
| 198 | "`Twas brillig, and the slithy toves"\ | ||
| 199 | "Did gyre and gimble in the wabe;"\ | ||
| 200 | "All mimsy were the borogoves,"\ | ||
| 201 | "And the mome raths outgrabe."\ | ||
| 202 | ""\ | ||
| 203 | "`Beware the Jabberwock, my son!"\ | ||
| 204 | "The jaws that bite, the claws that catch!"\ | ||
| 205 | "Beware the Jujub bird, and shun"\ | ||
| 206 | "The frumious Bandersnatch!'"\ | ||
| 207 | ""\ | ||
| 208 | "He took his vorpal sword in hand:"\ | ||
| 209 | "Long time the manxome foe he sought --"\ | ||
| 210 | "So rested he by the Tumtum gree,"\ | ||
| 211 | "And stood awhile in thought."\ | ||
| 212 | ""\ | ||
| 213 | "And as in uffish thought he stood,"\ | ||
| 214 | "The Jabberwock, with eyes of flame,"\ | ||
| 215 | "Came whiffling through the tulgey wook,"\ | ||
| 216 | "And burbled as it came!"\ | ||
| 217 | ""\ | ||
| 218 | "One, two! One, two! And through and through"\ | ||
| 219 | "The vorpal blade went snicker-snack!"\ | ||
| 220 | "He left it dead, and with its head"\ | ||
| 221 | "He went galumphing back."\ | ||
| 222 | ""\ | ||
| 223 | "`And has thou slain the Jabberwock?"\ | ||
| 224 | "Come to my arms, my beamish boy!"\ | ||
| 225 | "O frabjous day! Calloh! Callay!"\ | ||
| 226 | "He chortled in his joy."\ | ||
| 227 | ""\ | ||
| 228 | "`Twas brillig, and the slithy toves"\ | ||
| 229 | "Did gyre and gimble in the wabe;"\ | ||
| 230 | "All mimsy were the borogoves,"\ | ||
| 231 | "And the mome raths outgrabe."\ | ||
| 232 | ""\ | ||
| 233 | ""\ | ||
| 234 | "Date: Fri, 28 Dec 2001 23:28:08 +0200"\ | ||
| 235 | "From: Bar <bar@dontmailme.org>"\ | ||
| 236 | "To: Foo Bar <foobar@nonexistent.net>"\ | ||
| 237 | "Subject: Re: Jabberwocky"\ | ||
| 238 | ""\ | ||
| 239 | "It seems very pretty, but it's *rather* hard to understand!'"\ | ||
| 240 | "Somehow it seems to fill my head with ideas -- only I don't"\ | ||
| 241 | "exactly know what they are! However, SOMEBODY killed SOMETHING:"\ | ||
| 242 | "that's clear, at any rate..."\ | ||
| 243 | ""\ | ||
| 244 | "" | ||
| 245 | |||
| 246 | mu_exec -message "readmsg -h SOMETHING" -arg -h -arg SOMETHING \ | ||
| 247 | "Received: (from bar@dontmailme.org) "\ | ||
| 248 | " by dontmailme.org id fERKR9N16790"\ | ||
| 249 | " for foobar@nonexistent.net; Fri, 28 Dec 2001 22:18:08 +0200"\ | ||
| 250 | "Date: Fri, 28 Dec 2001 23:28:08 +0200"\ | ||
| 251 | "From: Bar <bar@dontmailme.org>"\ | ||
| 252 | "To: Foo Bar <foobar@nonexistent.net>"\ | ||
| 253 | "Message-Id: <200112232808.fERKR9N16790@dontmailme.org>"\ | ||
| 254 | "Subject: Re: Jabberwocky"\ | ||
| 255 | ""\ | ||
| 256 | "It seems very pretty, but it's *rather* hard to understand!'"\ | ||
| 257 | "Somehow it seems to fill my head with ideas -- only I don't"\ | ||
| 258 | "exactly know what they are! However, SOMEBODY killed SOMETHING:"\ | ||
| 259 | "that's clear, at any rate..."\ | ||
| 260 | ""\ | ||
| 261 | "" | ||
| 262 | |||
| 263 | mu_exec -message "readmsg -n SOMETHING" -arg -n -arg SOMETHING \ | ||
| 264 | "It seems very pretty, but it's *rather* hard to understand!'"\ | ||
| 265 | "Somehow it seems to fill my head with ideas -- only I don't"\ | ||
| 266 | "exactly know what they are! However, SOMEBODY killed SOMETHING:"\ | ||
| 267 | "that's clear, at any rate..."\ | ||
| 268 | ""\ | ||
| 269 | "" | ||
| 270 | |||
| 271 | mu_exec -message "readmsg -w date,subject SOMETHING" -arg "-w date,subject" \ | ||
| 272 | -arg SOMETHING \ | ||
| 273 | "Date: Fri, 28 Dec 2001 23:28:08 +0200"\ | ||
| 274 | "Subject: Re: Jabberwocky"\ | ||
| 275 | ""\ | ||
| 276 | "It seems very pretty, but it's *rather* hard to understand!'"\ | ||
| 277 | "Somehow it seems to fill my head with ideas -- only I don't"\ | ||
| 278 | "exactly know what they are! However, SOMEBODY killed SOMETHING:"\ | ||
| 279 | "that's clear, at any rate..."\ | ||
| 280 | ""\ | ||
| 281 | "" | ||
| 282 | |||
| 283 | #end of test.exp | ||
| 284 | |||
| 285 | |||
| ... | \ No newline at end of file | ... | \ No newline at end of file |
-
Please register or sign in to post a comment