X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=win32%2Fbin%2Fsearch.pl;h=f647b8426f3f3a00bde1b1f4bb213a4e0f053e17;hb=9ba1b7d248e0db6e26fa52ba8d5b3768aa0b633f;hp=5c3d65e06efd09a2774697e3b00b5bd9fa9967b8;hpb=e8847ffbd13aa097e1850a7a385a56dc5d9ce355;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/win32/bin/search.pl b/win32/bin/search.pl
index 5c3d65e..f647b84 100644
--- a/win32/bin/search.pl
+++ b/win32/bin/search.pl
@@ -47,7 +47,12 @@ $version = "950918.5";
 $stripped=0;
 
 &init;
-$rc_file = join('/', $ENV{'HOME'}, ".search");
+if (exists $ENV{'HOME'}) {
+    $rc_file = join('/', $ENV{'HOME'}, ".search");
+}
+else {
+    $rc_file = "";
+}
 
 &check_args;