diff --git a/src/xinit.c b/src/xinit.c
index 2f4bcb0e..58e33431 100644
--- a/src/xinit.c
+++ b/src/xinit.c
@@ -1685,7 +1685,7 @@ static void create_new_window(int *window_count, const char *win_path, const cha
     my_snprintf(toppath, S(toppath), ".x%d", n);
   }
   if(has_x) {
-    tclvareval("toplevel ", toppath, " -bg {} -width 400 -height 400", NULL);
+    tclvareval("toplevel ", toppath, " -bg {} -width 400 -height 400 -takefocus 0", NULL);
     tclvareval("set_geom ", toppath, " [abs_sym_path {", fname, "}]", NULL);
     tclvareval("build_widgets ", toppath, NULL);
     tclvareval("pack_widgets ", toppath, NULL);
diff --git a/src/xschem.tcl b/src/xschem.tcl
index f9ae80e4..255d2686 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -9144,7 +9144,7 @@ proc build_widgets { {topwin {} } } {
   menu $topwin.menubar.edit -tearoff 0 -takefocus 0
   $topwin.menubar add cascade -label "Options" -menu $topwin.menubar.option
   menu $topwin.menubar.option -tearoff 0 -takefocus 0
-  topwin.menubar add cascade -label "View" -menu $topwin.menubar.view
+  $topwin.menubar add cascade -label "View" -menu $topwin.menubar.view
   menu $topwin.menubar.view -tearoff 0 -takefocus 0
   $topwin.menubar add cascade -label "Properties" -menu $topwin.menubar.prop
   menu $topwin.menubar.prop -tearoff 0 -takefocus 0