mirror of
https://github.com/fspc/gbootroot.git
synced 2025-02-23 00:53:23 -05:00
* Minor edit.
This commit is contained in:
parent
f41f464389
commit
4771d74403
4
Yard.pm
4
Yard.pm
@ -43,6 +43,7 @@ use FileHandle;
|
||||
use Cwd; # I am not even sure if this is being used here now
|
||||
use English; # I think this can be ditched for portability
|
||||
use File::Find; # used by check_root_fs
|
||||
# use Error; # missing temporarily
|
||||
|
||||
my (%Included, %replaced_by, %links_to, %is_module, %hardlinked,
|
||||
%strippable, %lib_needed_by, @Libs);
|
||||
@ -77,9 +78,6 @@ sub warning {
|
||||
sub verbosity { $verbosity = $_[0]; }
|
||||
sub text_insert { $text_insert = $_[0]; $red = $_[1]; $blue = $_[2]; }
|
||||
sub logadj { $logadj = $_[0]; }
|
||||
# This is because verbosity_box is in start_logging_output
|
||||
#sub verbosity_window { $verbosity_window = $_[0]; }
|
||||
|
||||
|
||||
## REQUIRES $kernel opt. $kernel_version
|
||||
sub kernel_version_check {
|
||||
|
@ -264,9 +264,9 @@ start_logging_output($verbosefn,$verbosity); # Yard "tmp dir name"
|
||||
# "verbosity level"
|
||||
|
||||
|
||||
# Gtk::check_version expects different arguments .7004 so will have
|
||||
# Gtk::check_version expects different arguments than .7004 so will have
|
||||
# to check for the version instead.
|
||||
# Right now >= 0.7000 is o.k.
|
||||
# Right now >= 0.7002 is o.k.
|
||||
#if (Gtk::check_version(undef,"1","0","7") =~ /too old/) {
|
||||
|
||||
if (Gtk->major_version < 1) {
|
||||
@ -314,8 +314,8 @@ my ($circles,$mask) = Gtk::Gdk::Pixmap->create_from_xpm_d($window->window,
|
||||
@xpm_data);
|
||||
$window->window->set_icon(undef, $circles, $mask);
|
||||
$window->window->set_icon_name("gBootRoot");
|
||||
#$window->window->set_decorations(['all', 'menu']); # Zas
|
||||
#$window->window->set_functions(['all', 'resize']); # Zas
|
||||
## $window->window->set_decorations(['all', 'menu']); # Zas
|
||||
## $window->window->set_functions(['all', 'resize']); # Zas
|
||||
|
||||
my $tooltips = new Gtk::Tooltips();
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user