Browse Source

* Minor edit.

master
freesource 24 years ago
parent
commit
4771d74403
  1. 4
      Yard.pm
  2. 8
      gBootRoot

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 {

8
gBootRoot

@ -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…
Cancel
Save