1 files changed, 7 insertions, 0 deletions
diff --git a/t/v2writable.t b/t/v2writable.t
index c48f060e..0eda432a 100644
--- a/t/v2writable.t
+++ b/t/v2writable.t
@@ -231,4 +231,11 @@ EOF
          ok(!$@, '->done is idempotent');
  }
  
+{
+        ok($im->add($mime), 'add message to be purged');
+        local $SIG{__WARN__} = sub {};
+        ok($im->purge($mime), 'purged message');
+        $im->done;
+}
+
  done_testing();