diff --git a/frontend/xorriso-tcltk b/frontend/xorriso-tcltk
index f81c2c59..08dd318b 100755
--- a/frontend/xorriso-tcltk
+++ b/frontend/xorriso-tcltk
@@ -56,10 +56,10 @@ proc print_usage {argv0} {
   puts stderr "     Sets the position of the main window."
   puts stderr " --click_to_focus"
   puts stderr "     Chooses that input fields and list boxes get the keyboard"
-  puts stderr "     focus only when being clicked by the mouse."
+  puts stderr "     focus only when being clicked by the mouse. (Default)"
   puts stderr " --auto_focus"
   puts stderr "     Chooses that the keyboard focus is where the mouse"
-  puts stderr "     pointer is. (Default)"
+  puts stderr "     pointer is."
   puts stderr " --log_file path"
   puts stderr "     Set a file address for logging of xorriso commands and"
   puts stderr "     reply messages. The log lines will be appended."
@@ -1044,7 +1044,7 @@ set extract_auto_chmod 0
 set busy_text_exists 0
 
 # Whether to demand a click before focus goes to entry or listbox
-set click_to_focus "0"
+set click_to_focus 1
 
 # Whether .ack_window , .yesno_window , .help_window, .main_help_window
 # are already displayed.
@@ -3108,7 +3108,7 @@ set tree_window_button_width 6
 proc init_gui {} {
   global .input .cmdline_entry .msgbox  .errmsg .dev .drivebox
   global .isobox .localfs
-  global main_framerelief main_borderwidth
+  global main_framerelief main_borderwidth click_to_focus
 
   check_for_bwidget
 
@@ -3140,7 +3140,9 @@ proc init_gui {} {
   pack .connection_block .drive_block .iso_block \
        -side top -expand 1 -fill both
 
-  focus .cmdline_entry
+  if {$click_to_focus == 1} {
+    focus .msglist
+  }
 }
 
 
diff --git a/xorriso/xorriso_timestamp.h b/xorriso/xorriso_timestamp.h
index 847f147c..bb526c46 100644
--- a/xorriso/xorriso_timestamp.h
+++ b/xorriso/xorriso_timestamp.h
@@ -1 +1 @@
-#define Xorriso_timestamP "2013.01.03.101633"
+#define Xorriso_timestamP "2013.01.03.102627"