libburnia/libisoburn
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Disabled "Extract to disk" button if extraction is banned

Browse Source
This commit is contained in:
Thomas Schmitt 2013-01-06 10:24:27 +00:00
parent a3cbe88544
commit 6eaad04b54
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
frontend/xorriso-tcltk
View File

@ -2430,6 +2430,9 @@ proc osirrox_banned {} {
set m ".script_log.menu" set m ".script_log.menu"
$m entryconfigure "Allow extract to disk" -state "disabled" $m entryconfigure "Allow extract to disk" -state "disabled"
$m entryconfigure "Permanently ban extraction" -state "disabled" $m entryconfigure "Permanently ban extraction" -state "disabled"
.extract_button configure -state "disabled"
} }
@ -4051,11 +4054,16 @@ proc init_localfs {} {
# #
proc init_extract {} { proc init_extract {} {
global borderwidth extract_to_adr extract_from_selected extract_underneath global borderwidth extract_to_adr extract_from_selected extract_underneath
global osirrox_allowed
global .extract_button .extract_frame .extract_entry .extract_from_selected global .extract_button .extract_frame .extract_entry .extract_from_selected
global .extract_underneath global .extract_underneath
set extract_state "normal"
if {$osirrox_allowed == 0} {set extract_state "disabled"}
frame .extract_frame -borderwidth 0 frame .extract_frame -borderwidth 0
button .extract_button -text "Extract to disk:" \ button .extract_button -text "Extract to disk:" \
-state $extract_state \
-width 17 \ -width 17 \
-command {extract_to} -command {extract_to}
bind_help .extract_button "Extract to disk:" bind_help .extract_button "Extract to disk:"

2
xorriso/xorriso_timestamp.h
View File

@ -1 +1 @@
#define Xorriso_timestamP "2013.01.06.100954" #define Xorriso_timestamP "2013.01.06.102339"