Changed layout of drive list and drive buttons
This commit is contained in:
parent
9cad4ae1ba
commit
bcfe11e23b
@ -1205,7 +1205,7 @@ proc refresh_outdev {} {
|
||||
# Called when the "Scan for drives button" is hit.
|
||||
#
|
||||
proc scan_for_drives {} {
|
||||
global .drivelist
|
||||
global .drivelist .drive_drop_both .drive_scan
|
||||
global sieve_ret result_list devlist devices_scanned indev_adr outdev_adr
|
||||
|
||||
if {[assert_no_changes] == 0} {return ""}
|
||||
@ -1242,6 +1242,8 @@ proc scan_for_drives {} {
|
||||
}
|
||||
}
|
||||
set devices_scanned 1
|
||||
set normal_color [.drive_drop_both cget -background]
|
||||
.drive_scan configure -background "$normal_color"
|
||||
update idletasks
|
||||
|
||||
# Command -devices drops all aquired drives
|
||||
@ -3125,7 +3127,14 @@ proc init_drivebox {} {
|
||||
pack .drivescroll -in .drivelistbox -side right -fill y
|
||||
|
||||
frame .drive_picker -borderwidth $borderwidth
|
||||
frame .drive_picker_line_1 -borderwidth 0
|
||||
frame .drive_picker_line_2 -borderwidth 0
|
||||
frame .drive_aux_buttons_line_1 -borderwidth 0
|
||||
frame .drive_aux_buttons_line_2 -borderwidth 0
|
||||
frame .drive_aux_buttons -borderwidth 0
|
||||
|
||||
button .drive_scan -text "Scan for drives" \
|
||||
-background "grey" \
|
||||
-command "scan_for_drives"
|
||||
bind_help .drive_scan "Scan for drives"
|
||||
button .drive_pick_in -text "Pick input drive" \
|
||||
@ -3143,17 +3152,26 @@ proc init_drivebox {} {
|
||||
button .drive_calm -text "Calm drives" \
|
||||
-command "calm_drives"
|
||||
bind_help .drive_calm "Calm drives"
|
||||
button .iso_rollback_button -text "Rollback" -command {iso_rollback}
|
||||
button .iso_rollback_button -text "Rollback" -width 9 \
|
||||
-command {iso_rollback}
|
||||
bind_help .iso_rollback_button "Rollback"
|
||||
|
||||
pack .drive_scan \
|
||||
.drive_pick_in .drive_pick_out .drive_pick_both \
|
||||
.drive_drop_both .drive_calm .iso_rollback_button \
|
||||
-in .drive_picker -side left -expand 1 -fill none
|
||||
pack .drive_picker -in .drivebox \
|
||||
-side top -expand 1 -fill none
|
||||
pack .drivelistbox -in .drivebox \
|
||||
-side top -expand 1 -fill both
|
||||
# One button block left, one right
|
||||
pack .drive_pick_in .drive_pick_out \
|
||||
-in .drive_picker_line_1 -side left -expand 1 -fill none
|
||||
pack .drive_pick_both \
|
||||
-in .drive_picker_line_2 -side left -expand 1 -fill x
|
||||
pack .drive_picker_line_1 .drive_picker_line_2 \
|
||||
-in .drive_picker -side top -expand 1 -fill x -anchor w
|
||||
pack .drive_scan .drive_drop_both \
|
||||
-in .drive_aux_buttons_line_1 -side left -expand 1 -fill none
|
||||
pack .drive_calm .iso_rollback_button \
|
||||
-in .drive_aux_buttons_line_2 -side left -expand 1 -fill x
|
||||
pack .drive_aux_buttons_line_1 .drive_aux_buttons_line_2 \
|
||||
-in .drive_aux_buttons -side top -expand 1 -fill x -anchor w
|
||||
pack .drive_picker -in .drivebox -side left -expand 0 -fill none
|
||||
pack .drivelistbox -in .drivebox -side left -expand 1 -fill both
|
||||
pack .drive_aux_buttons -in .drivebox -side left -expand 0 -fill none
|
||||
|
||||
bind .drivelist <Double-Button-1> {
|
||||
pick_dev
|
||||
@ -3691,7 +3709,7 @@ The GUI window is separated into three main areas:
|
||||
|
||||
- Click the \"Scan for drives\" button in the middle area.
|
||||
- Select a drive and click the \"Pick output drive\" button.
|
||||
- If the information field in the \"Output drive or Image\" line begins by
|
||||
- If the information field in the \"Output drive or image\" line begins by
|
||||
\"appendable\" or \"closed\" and if the medium is CD-RW, DVD-RW, DVD+RW, or
|
||||
BD-RE then click the \"Blank\" button to erase the old data.
|
||||
(Blanking of \"DVD-RW sequential recording\" will last very long.)
|
||||
@ -3699,8 +3717,8 @@ The GUI window is separated into three main areas:
|
||||
Either toggle in the address of the hard disk directory,
|
||||
or click on the \"/\" button to the right of the text field to get
|
||||
a file browser.
|
||||
- Hit the Return key or click on a name in the browser to schedule
|
||||
the disk directory for writing to the medium.
|
||||
- Hit the Return key in the text field or double click on a name in the
|
||||
browser to schedule the disk directory for writing to the medium.
|
||||
(You may of course insert several directories or files that way.)
|
||||
- Click the \"Write ISO session\" button in the middle area.
|
||||
Confirm in the \"yes/no\" window that pops up.
|
||||
@ -3712,9 +3730,14 @@ The GUI window is separated into three main areas:
|
||||
|
||||
Write a directory as only content to an ISO image data file on hard disk
|
||||
|
||||
- Toggle the name of the intended data file in the text field of the
|
||||
\"Output drive or image\" line and hit the Return key.
|
||||
- If the information field in the \"Output drive or Image\" line begins by
|
||||
- Go to the text field beneath \"Output drive or image\" and toggle
|
||||
the address of the image file. Or click on the \"/\" button to the right
|
||||
of the field to get a file browser.
|
||||
- You may click on a name in the browser and bring it into the text field
|
||||
by button \"Edit\".
|
||||
- When the intended file address is composed, hit the Return key in the
|
||||
text field.
|
||||
- If the information field in the \"Output drive or image\" line begins by
|
||||
\"appendable\" or \"closed\" then you addressed an existing data file.
|
||||
Warning: Applying the \"Blank\" button to it would damage its content !
|
||||
You probably do not want this in this special use case.
|
||||
@ -3727,15 +3750,15 @@ The GUI window is separated into three main areas:
|
||||
|
||||
- Click the \"Scan for drives\" button in the middle area.
|
||||
- Select a drive and click the \"Pick output drive\" button.
|
||||
- If the information field in the \"Output drive or Image\" line begins by
|
||||
- If the information field in the \"Output drive or image\" line begins by
|
||||
\"appendable\" or \"closed\" and if the medium is CD-RW, DVD-RW, DVD+RW, or
|
||||
BD-RE then click the \"Blank\" button to erase the old data.
|
||||
(Blanking of \"DVD-RW sequential recording\" will last very long.)
|
||||
- Go to the text field beneath the \"Burn image file:\" button and toggle
|
||||
the address of the image file. Or click on the \"/\" button to the right
|
||||
of the field to get a file browser.
|
||||
- Hit the Return key in the text field or click on a name in the browser
|
||||
to initiate the burn run.
|
||||
- Hit the Return key in the text field or double click on a name in the
|
||||
browser to initiate the burn run.
|
||||
Confirm in the \"yes/no\" window that pops up.
|
||||
- When the \"busy\" field displays \"ready\" again, you may click \"Eject\".
|
||||
Desktop drives should then put out the tray with the medium.
|
||||
@ -3770,14 +3793,14 @@ The GUI window is separated into three main areas:
|
||||
- Go to the \"ISO directory:\" line in the lower area.
|
||||
Either toggle in the address of the directory you want to extract or
|
||||
click the \"/\" button to get a file browser.
|
||||
- Hit the Return key or click on a name in the browser to determine
|
||||
the ISO directory for writing to the medium.
|
||||
- Hit the Return key in the text field or double click on a name in the
|
||||
browser to determine the ISO directory for writing to the medium.
|
||||
- Go to the \"Extract to disk:\" line in the lower area.
|
||||
Either toggle in the address of the hard disk directory,
|
||||
or click on the \"/\" button to the right of the text field to get
|
||||
a file browser.
|
||||
- Hit the Return key or click on a name in the browser to initiate the
|
||||
extraction run.
|
||||
- Hit the Return key in the text field or double click on a name in the
|
||||
browser to initiate the extraction run.
|
||||
If a \"yes/no\" window pops up, consider well whether you are up to
|
||||
to shooting your own foot right now.
|
||||
Enable the \"Overwrite disk files\" switch only if you are really
|
||||
@ -3795,7 +3818,7 @@ Dependencies:
|
||||
xorriso, Tcl language, Tk GUI toolkit, optionally Tcl/Tk package BWidget
|
||||
|
||||
Copyright (C) 2012, Thomas Schmitt <scdbackup@gmx.net>, libburnia-project.org
|
||||
Provided under GNU GPL version 3 or later."
|
||||
Provided under GNU GPL version 2 or later."
|
||||
}
|
||||
if {"$what" == "End"} {
|
||||
return \
|
||||
@ -3889,7 +3912,7 @@ since last time the \"Clear\" button was hit. It will not clear automatically."
|
||||
if {"$what" == "Scan for drives"} {
|
||||
return \
|
||||
"The \"Scan for drives\" button executes command -devices and puts the list
|
||||
of found optical drives into the box underneath the button.
|
||||
of found optical drives into the box beneath the button.
|
||||
|
||||
Scanning should be done before any ISO image manipulations because xorriso
|
||||
has to give up its aquired drives in order to perform the scan run.
|
||||
@ -3977,7 +4000,7 @@ aquired."
|
||||
}
|
||||
if {"$what" == "drivelist"} {
|
||||
return \
|
||||
"The box underneath the \"Scan for drives\" button shows the optical drives
|
||||
"The box beneath the \"Scan for drives\" button shows the optical drives
|
||||
which were found by the most recent scan run.
|
||||
|
||||
A double-click on a drive item has the same effect as button
|
||||
@ -4305,10 +4328,11 @@ or cursor movement in the file browser shall bring the selected file
|
||||
address into the associated text input field.
|
||||
|
||||
If the switch is disabled, then the address gets written into the field
|
||||
only if double clicked.
|
||||
only if double clicked, of by button \"Accept\", or by button \"Edit\".
|
||||
|
||||
In any case, double clicked addresses get treated as if the Return key
|
||||
had been hit in the text field."
|
||||
had been hit in the text field. The same happens with the selected item
|
||||
and button \"Accept\"."
|
||||
}
|
||||
if {"$what" == "Refresh avail:"} {
|
||||
return \
|
||||
|
@ -1 +1 @@
|
||||
#define Xorriso_timestamP "2012.12.31.100509"
|
||||
#define Xorriso_timestamP "2012.12.31.120152"
|
||||
|
Loading…
Reference in New Issue
Block a user