[Bps-public-commit] r11560 - SVN-PropDB/t

[clkao at bestpractical.com]

Author: clkao
Date: Sat Apr  5 21:32:08 2008
New Revision: 11560

Modified:
   SVN-PropDB/t/sd-hm.t

Log:
test should start cleanly.


Modified: SVN-PropDB/t/sd-hm.t
==============================================================================
--- SVN-PropDB/t/sd-hm.t	(original)
+++ SVN-PropDB/t/sd-hm.t	Sat Apr  5 21:32:08 2008
@@ -3,6 +3,14 @@
 use strict;
 use Prophet::Test tests => 3;
 
+use Test::More;
+BEGIN {
+    require File::Temp;
+    $ENV{'PROPHET_REPO'} = $ENV{'SVB_REPO'} =
+        File::Temp::tempdir( CLEANUP => 0).'/_svb';
+    warn $ENV{'PROPHET_REPO'};
+}
+
 # you need to run this test script from the BTDT directory
 
 eval 'use BTDT::Test; 1;' or die "$@";