Moved and renamed the "Refresh avail:" button
This commit is contained in:
parent
13755a11c7
commit
5129e9e621
@ -1919,7 +1919,7 @@ proc iso_rollback {} {
|
|||||||
|
|
||||||
# Inquire an accurate prediction of free space after writing a session with
|
# Inquire an accurate prediction of free space after writing a session with
|
||||||
# the pending changes of the ISO image.
|
# the pending changes of the ISO image.
|
||||||
# Called when button "Avail:" is hit.
|
# Called when button "Refresh avail:" is hit.
|
||||||
#
|
#
|
||||||
proc refresh_avail {} {
|
proc refresh_avail {} {
|
||||||
global result_list highest_cmd_sev
|
global result_list highest_cmd_sev
|
||||||
@ -3678,21 +3678,12 @@ proc init_isomanip {} {
|
|||||||
create_browser_button .isomanip_move_target_button \
|
create_browser_button .isomanip_move_target_button \
|
||||||
"isomanip_move_target" "isofs" "Browse ISO (move target)"
|
"isomanip_move_target" "isofs" "Browse ISO (move target)"
|
||||||
|
|
||||||
button .avail_button -text "Avail:" \
|
|
||||||
-command {refresh_avail}
|
|
||||||
bind_help .avail_button "Avail:"
|
|
||||||
frame .avail_label_frame -relief ridge -borderwidth 2
|
|
||||||
label .avail_label -width 10 -text ""
|
|
||||||
bind_help .avail_label "Avail:"
|
|
||||||
pack .avail_label -in .avail_label_frame
|
|
||||||
|
|
||||||
pack .isomanip_prefix .isomanip_verify_button .isomanip_rm_r_button \
|
pack .isomanip_prefix .isomanip_verify_button .isomanip_rm_r_button \
|
||||||
.isomanip_move_button .isomanip_move_target \
|
.isomanip_move_button .isomanip_move_target \
|
||||||
-in .isomanip_move -side left -expand 1 -fill both
|
-in .isomanip_move -side left -expand 1 -fill both
|
||||||
pack .isomanip_move_target_button -in .isomanip_move -side left
|
pack .isomanip_move_target_button -in .isomanip_move -side left
|
||||||
pack .isomanip_mkdir_button \
|
pack .isomanip_mkdir_button \
|
||||||
-in .isomanip_move -side left -expand 1 -fill both
|
-in .isomanip_move -side left -expand 1 -fill both
|
||||||
pack .avail_label_frame .avail_button -in .isomanip_move -side right
|
|
||||||
pack .isomanip_move \
|
pack .isomanip_move \
|
||||||
-in .isomanip -side top -expand 1 -fill both
|
-in .isomanip -side top -expand 1 -fill both
|
||||||
}
|
}
|
||||||
@ -3702,15 +3693,15 @@ proc init_isomanip {} {
|
|||||||
#
|
#
|
||||||
proc init_localfs {} {
|
proc init_localfs {} {
|
||||||
global borderwidth
|
global borderwidth
|
||||||
global .localfs .extract_frame .localfs_aux_frame .insert_frame
|
global .localfs .extract_frame .aux_control_frame .insert_frame
|
||||||
|
|
||||||
frame .localfs -borderwidth $borderwidth
|
frame .localfs -borderwidth $borderwidth
|
||||||
|
|
||||||
init_extract
|
init_extract
|
||||||
init_localfs_aux
|
init_aux_control
|
||||||
init_insert
|
init_insert
|
||||||
|
|
||||||
pack .extract_frame .localfs_aux_frame .insert_frame \
|
pack .extract_frame .aux_control_frame .insert_frame \
|
||||||
-in .localfs -side top -expand 1 -fill both
|
-in .localfs -side top -expand 1 -fill both
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -3756,12 +3747,12 @@ proc init_extract {} {
|
|||||||
|
|
||||||
# Some controls which apply to insertion, extraction, or both.
|
# Some controls which apply to insertion, extraction, or both.
|
||||||
#
|
#
|
||||||
proc init_localfs_aux {} {
|
proc init_aux_control {} {
|
||||||
global borderwidth have_bwidget permission_policy
|
global borderwidth have_bwidget permission_policy
|
||||||
global .localfs_aux_frame
|
global .aux_control_frame
|
||||||
global .overwrite_iso_files_button .overwrite_dir_button .extract_auto_chmod
|
global .overwrite_iso_files_button .overwrite_dir_button .extract_auto_chmod
|
||||||
|
|
||||||
frame .localfs_aux_frame -borderwidth 0
|
frame .aux_control_frame -borderwidth 0
|
||||||
|
|
||||||
menubutton .overwriting -text "Overwriting:" -width 16 -anchor w \
|
menubutton .overwriting -text "Overwriting:" -width 16 -anchor w \
|
||||||
-direction above -relief ridge -indicatoron 1 \
|
-direction above -relief ridge -indicatoron 1 \
|
||||||
@ -3791,7 +3782,7 @@ proc init_localfs_aux {} {
|
|||||||
-variable extract_auto_chmod \
|
-variable extract_auto_chmod \
|
||||||
-onvalue 1 -offvalue 0
|
-onvalue 1 -offvalue 0
|
||||||
|
|
||||||
pack .overwriting -in .localfs_aux_frame -side left
|
pack .overwriting -in .aux_control_frame -side left
|
||||||
|
|
||||||
if {$have_bwidget == 1} {
|
if {$have_bwidget == 1} {
|
||||||
checkbutton .browse_select_is_setvar -text "File browser text field" \
|
checkbutton .browse_select_is_setvar -text "File browser text field" \
|
||||||
@ -3800,7 +3791,7 @@ proc init_localfs_aux {} {
|
|||||||
-variable "browse_select_is_setvar" \
|
-variable "browse_select_is_setvar" \
|
||||||
-onvalue 1 -offvalue 0
|
-onvalue 1 -offvalue 0
|
||||||
bind_help .browse_select_is_setvar "File browser text field"
|
bind_help .browse_select_is_setvar "File browser text field"
|
||||||
pack .browse_select_is_setvar -in .localfs_aux_frame -side left
|
pack .browse_select_is_setvar -in .aux_control_frame -side left
|
||||||
}
|
}
|
||||||
|
|
||||||
menubutton .perm_policy -text "Permissions: as is" -width 22 -anchor w \
|
menubutton .perm_policy -text "Permissions: as is" -width 22 -anchor w \
|
||||||
@ -3817,9 +3808,18 @@ proc init_localfs_aux {} {
|
|||||||
$m add radiobutton -label "mkisofs -r" -value "mkisofs_r" \
|
$m add radiobutton -label "mkisofs -r" -value "mkisofs_r" \
|
||||||
-variable permission_policy -command show_permission_policy
|
-variable permission_policy -command show_permission_policy
|
||||||
show_permission_policy
|
show_permission_policy
|
||||||
|
|
||||||
bind_help .perm_policy "Permissions:"
|
bind_help .perm_policy "Permissions:"
|
||||||
pack .perm_policy -in .localfs_aux_frame -side right
|
|
||||||
|
button .avail_button -text "Refresh avail:" \
|
||||||
|
-command {refresh_avail}
|
||||||
|
bind_help .avail_button "Refresh avail:"
|
||||||
|
frame .avail_label_frame -relief ridge -borderwidth 2
|
||||||
|
label .avail_label -width 10 -text ""
|
||||||
|
bind_help .avail_label "Refresh avail:"
|
||||||
|
pack .avail_label -in .avail_label_frame
|
||||||
|
|
||||||
|
pack .avail_label_frame .avail_button .perm_policy \
|
||||||
|
-in .aux_control_frame -side right
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
@ -4671,9 +4671,9 @@ If there is any x-permission, then all three x get granted. s- and t-bits
|
|||||||
get removed.
|
get removed.
|
||||||
"
|
"
|
||||||
}
|
}
|
||||||
if {$what == "Avail:"} {
|
if {$what == "Refresh avail:"} {
|
||||||
return \
|
return \
|
||||||
"The \"Avail:\" button triggers command -tell_media_space. It makes
|
"The \"Refresh avail:\" button triggers command -tell_media_space. It makes
|
||||||
a time consuming exact prediction of the free space on the medium in the
|
a time consuming exact prediction of the free space on the medium in the
|
||||||
output drive. For this purpose, the size of an ISO session with the pending
|
output drive. For this purpose, the size of an ISO session with the pending
|
||||||
changes is computed.
|
changes is computed.
|
||||||
|
@ -1 +1 @@
|
|||||||
#define Xorriso_timestamP "2013.01.03.182504"
|
#define Xorriso_timestamP "2013.01.03.185545"
|
||||||
|
Loading…
Reference in New Issue
Block a user