--- R-2.1.0/src/unix/system.c.orig	2005-05-10 22:39:37.261346408 +0200
+++ R-2.1.0/src/unix/system.c	2005-05-10 22:47:33.417959600 +0200
@@ -255,6 +255,12 @@
 #endif
     R_Interactive = isatty(0);
 
+#ifdef HAVE_TCLTK
+    if(useTk)
+	/* If we are started by a menu, we don't get a tty, 
+	 * but _are_ interactive */
+	R_Interactive = 1;
+#endif
 #ifdef HAVE_AQUA
     if(useaqua){
 	R_Outputfile = NULL;