mirror of
https://github.com/fspc/gbootroot.git
synced 2025-02-23 00:53:23 -05:00
Added some Yard globals.
This commit is contained in:
parent
cd956e12e1
commit
9bc4b7489f
18
gBootRoot
18
gBootRoot
@ -147,6 +147,7 @@ my ($bz2_toggle_root,$gz_toggle_root);
|
|||||||
my ($combo);
|
my ($combo);
|
||||||
my ($adj2,$adj3);
|
my ($adj2,$adj3);
|
||||||
|
|
||||||
|
|
||||||
# My own creation - the roots touch the ground if three lines are added.
|
# My own creation - the roots touch the ground if three lines are added.
|
||||||
my @xpm_data = (
|
my @xpm_data = (
|
||||||
"32 45 3 1",
|
"32 45 3 1",
|
||||||
@ -236,7 +237,16 @@ if (!-d "$tmp1/gbootroot_mnt$$") {
|
|||||||
"mkdir $tmp1/gbootroot_mnt$$",
|
"mkdir $tmp1/gbootroot_mnt$$",
|
||||||
"gBootRoot: ERROR: Could not make mount directory") != 2;
|
"gBootRoot: ERROR: Could not make mount directory") != 2;
|
||||||
}
|
}
|
||||||
my $verbosefn = "$tmp/verbose";
|
|
||||||
|
# Verbosity should probably be controlled separately for each
|
||||||
|
# method.
|
||||||
|
|
||||||
|
# Yard
|
||||||
|
# 0 --> only the important messages.
|
||||||
|
# 1 --> all messages.
|
||||||
|
my $verbosity = 1;
|
||||||
|
my $verbosefn = "$tmp/verbose"; # gBootRoot
|
||||||
|
my $yard_temp = "$tmp/yard_verbose; # Yard
|
||||||
|
|
||||||
|
|
||||||
# Right now >= 0.7000 is o.k.
|
# Right now >= 0.7000 is o.k.
|
||||||
@ -1354,8 +1364,10 @@ sub error_window {
|
|||||||
|
|
||||||
if (not defined $error_window) {
|
if (not defined $error_window) {
|
||||||
$error_window = new Gtk::Dialog;
|
$error_window = new Gtk::Dialog;
|
||||||
$error_window->signal_connect("destroy", \&destroy_window, \$error_window);
|
$error_window->signal_connect("destroy", \&destroy_window,
|
||||||
$error_window->signal_connect("delete_event", \&destroy_window, \$error_window);
|
\$error_window);
|
||||||
|
$error_window->signal_connect("delete_event", \&destroy_window,
|
||||||
|
\$error_window);
|
||||||
$error_window->set_title("gBootRoot ERROR");
|
$error_window->set_title("gBootRoot ERROR");
|
||||||
$error_window->border_width(15);
|
$error_window->border_width(15);
|
||||||
my $label = new Gtk::Label($error);
|
my $label = new Gtk::Label($error);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user