require "vnd.dovecot.testsuite";
require "fileinto";
require "variables";
require "mailbox";
set "message1" text:
From: stephan@example.org
To: nico@frop.example.org
Subject: First message
Frop
.
;
set "message2" text:
From: stephan@example.org
To: nico@frop.example.org
Subject: Second message
Frop
.
;
set "message3" text:
From: stephan@example.org
To: nico@frop.example.org
Subject: Third message
Frop
.
;
test "Duplicates" {
test_set "message" "${message1}";
fileinto :create "Folder";
fileinto :create "Folder";
if not test_result_execute {
test_fail "failed to execute first result";
}
test_result_reset;
test_set "message" "${message2}";
fileinto :create "Folder";
fileinto :create "Folder";
if not test_result_execute {
test_fail "failed to execute second result";
}
test_result_reset;
test_set "message" "${message3}";
fileinto :create "Folder";
fileinto :create "Folder";
if not test_result_execute {
test_fail "failed to execute third result";
}
test_message :folder "Folder" 0;
if not header :is "subject" "First message" {
test_fail "first message incorrect";
}
test_message :folder "Folder" 1;
if not header :is "subject" "Second message" {
test_fail "first message incorrect";
}
test_message :folder "Folder" 2;
if not header :is "subject" "Third message" {
test_fail "first message incorrect";
}
}