diff --git a/bin/export.pike b/bin/export.pike
index 0f309382ff3312bdde0e60306414db8ec80c36d4..83b5096cc9e8f72db1d0a6a82433ff2fc4a5e2d4 100755
--- a/bin/export.pike
+++ b/bin/export.pike
@@ -1,6 +1,6 @@
 #!/usr/local/bin/pike
 
-/* $Id: export.pike,v 1.30 2000/03/27 00:45:25 hubbe Exp $ */
+/* $Id: export.pike,v 1.31 2000/03/27 20:29:45 hubbe Exp $ */
 
 #include <simulate.h>
 import Stdio;
@@ -205,7 +205,7 @@ int main(int argc, string *argv)
   object o=Stdio.File();
 
   int first=1;
-  foreach(files/50,files)
+  foreach(files/50.0,files)
     {
       if(Process.create_process(({"tar",
 				    first?"cvf":"rvf",
diff --git a/bin/install.pike b/bin/install.pike
index b36e42e8d8f5d7a131cf3bbb426cbd08dea4827a..176654e8fa65bd96ce722905ed8c8b0a58c3c8e7 100644
--- a/bin/install.pike
+++ b/bin/install.pike
@@ -24,7 +24,17 @@ int istty()
   if(!istty_cache)
   {
     istty_cache=!!Stdio.stdin->tcgetattr();
-    if(!istty_cache) istty_cache=-1;
+    if(!istty_cache)
+    {
+      istty_cache=-1;
+    }else{
+      switch(getenv("TERM"))
+      {
+	case "dumb":
+	case "emacs":
+	  istty_cache=-1;
+      }
+    }
   }
   return istty_cache>0;
 #endif
@@ -514,7 +524,7 @@ done
   string tmpmsg=".";
 
   string tararg="cf";
-  foreach(to_export/50, array files_to_tar)
+  foreach(to_export/50.0, array files_to_tar)
     {
       status("Creating",tmpname+".tar",tmpmsg);
       tmpmsg+=".";
@@ -1127,7 +1137,7 @@ void do_install()
       foreach(to_dump, string mod) rm(mod+".o");
       /* Dump 50 modules at a time */
       write("\n");
-      foreach(to_dump/50,to_dump)
+      foreach(to_dump/50.0,to_dump)
 	{
 	  write("    ");
 	  Process.create_process( ({pike,
diff --git a/bin/test_pike.pike b/bin/test_pike.pike
index 3d838c39f05b1d5ed29bf179e7111047fe756e36..1156ad05baaf2af8566008897186b1d3673ce44e 100755
--- a/bin/test_pike.pike
+++ b/bin/test_pike.pike
@@ -1,6 +1,6 @@
 #!/usr/local/bin/pike
 
-/* $Id: test_pike.pike,v 1.39 2000/03/25 22:45:59 hubbe Exp $ */
+/* $Id: test_pike.pike,v 1.40 2000/03/27 20:29:45 hubbe Exp $ */
 
 import Stdio;
 
@@ -27,7 +27,17 @@ int istty()
   if(!istty_cache)
   {
     istty_cache=!!Stdio.stdin->tcgetattr();
-    if(!istty_cache) istty_cache=-1;
+    if(!istty_cache)
+    {
+      istty_cache=-1;
+    }else{
+      switch(getenv("TERM"))
+      {
+	case "dumb":
+	case "emacs":
+	  istty_cache=-1;
+      }
+    }
   }
   return istty_cache>0;
 #endif