From cedbad07723b5bc2942c5bf50794438b54313188 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Mon, 13 Apr 2009 15:21:16 -0500
Subject: [PATCH] Fix tests to not clutter Factor directory

---
 basis/http/http-tests.factor                   | 6 +++++-
 extra/webapps/site-watcher/site-watcher.factor | 2 +-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/basis/http/http-tests.factor b/basis/http/http-tests.factor
index 45ad132677..5c73377cbe 100644
--- a/basis/http/http-tests.factor
+++ b/basis/http/http-tests.factor
@@ -393,6 +393,10 @@ SYMBOL: a
 [ "OK" ] [ "data" "http://localhost/a" add-port http-post nip ] unit-test
 
 ! Check that download throws errors (reported by Chris Double)
-[ "http://localhost/tweet_my_twat" add-port download ] must-fail
+[
+    "resource:temp" [
+        "http://localhost/tweet_my_twat" add-port download
+    ] with-directory
+] must-fail
 
 [ ] [ "http://localhost/quit" add-port http-get 2drop ] unit-test
diff --git a/extra/webapps/site-watcher/site-watcher.factor b/extra/webapps/site-watcher/site-watcher.factor
index 7651afa4e6..edd8104a7e 100644
--- a/extra/webapps/site-watcher/site-watcher.factor
+++ b/extra/webapps/site-watcher/site-watcher.factor
@@ -69,7 +69,7 @@ IN: webapps.site-watcher
         8431 >>secure ;
 
 : site-watcher-db ( -- db )
-    "resource:test.db" <sqlite-db> ;
+    "test.db" temp-file <sqlite-db> ;
 
 <site-watcher-app>
 <login-config>