Changed xorriso-tcltk default to --click_to_focus

This commit is contained in:
Thomas Schmitt 2013-01-03 10:27:18 +00:00
parent f30d1a642d
commit 060f8b1bef
2 changed files with 8 additions and 6 deletions

View File

@ -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
}
}

View File

@ -1 +1 @@
#define Xorriso_timestamP "2013.01.03.101633"
#define Xorriso_timestamP "2013.01.03.102627"