# This file is part of GNU Mailutils. -*- Autotest -*- # Copyright (C) 2015-2021 Free Software Foundation, Inc. # # GNU Mailutils is free software; you can redistribute it and/or # modify it under the terms of the GNU General Public License as # published by the Free Software Foundation; either version 3, or (at # your option) any later version. # # GNU Mailutils is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # # You should have received a copy of the GNU General Public License # along with GNU Mailutils. If not, see <http://www.gnu.org/licenses/>. AT_SETUP([copy: # expansion]) AT_KEYWORDS([copy copy04]) # Description: Check whether special mailbox notations are correctly expanded # in copy command. This was broken by commit eea2c4aa. # # This testcase checks for expansion of "#". AT_CHECK([ MUT_MBCOPY($abs_top_srcdir/testsuite/spool/mbox) folder=`pwd` MBOX=$folder/mbox NEW=$folder/new >$NEW AT_DATA([script],[file +new file +mbox copy 1 # ]) MUT_MAIL_CMD -N -E "set folder=\"$folder\"" -f $MBOX < script | dnl sed -e 's/ *$//' \ -e 's|'$NEW'|NEW|'\ -e '/"NEW" *[[0-9]]/s/[[0-9]][[0-9]]*/D/g'\ -e 's|'$MBOX'|MBOX|'\ sed '/^X-IMAPbase:/d;/^Status:/d;/^X-UID/d' $NEW | diff - $abs_top_srcdir/testsuite/spool/mbox ], [0], [Held 1 message in MBOX Held 0 messages in NEW "NEW" D/D Held 1 message in MBOX ]) AT_CLEANUP