From a0686c30f1315a6ca8c10acfca386df468f172a8 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@csail.mit.edu>
Date: Thu, 5 May 2016 16:55:03 -0400
Subject: Add some tests for Content-Disposition

---
 tests/contentDisposition.ur | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100644 tests/contentDisposition.ur

(limited to 'tests/contentDisposition.ur')

diff --git a/tests/contentDisposition.ur b/tests/contentDisposition.ur
new file mode 100644
index 00000000..8fe2b26c
--- /dev/null
+++ b/tests/contentDisposition.ur
@@ -0,0 +1,4 @@
+fun main () : transaction page =
+    setHeader (blessResponseHeader "Content-Disposition")
+              ("attachment; filename=test.txt");
+    returnBlob (textBlob "Hi there!") (blessMime "text/plain")
-- 
cgit v1.2.3