bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-23 09:03:23 -05:00
Code Issues Projects Releases Wiki Activity

Modifications to allow gBootRoot changes to work

Browse Source
This commit is contained in:
freesource 2000-11-15 05:43:50 +00:00
parent cab23dfbf1
commit 0087f77d76
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Yard.pm
View File

@ -31,9 +31,9 @@ package Yard;
use vars qw(@ISA @EXPORT %EXPORT_TAGS); use vars qw(@ISA @EXPORT %EXPORT_TAGS);
use Exporter; use Exporter;
@ISA = qw(Exporter); @ISA = qw(Exporter);
@EXPORT = qw(start_logging_output kernel_version_check @EXPORT = qw(start_logging_output info kernel_version_check
read_contents_file extra_links library_dependencies hard_links read_contents_file extra_links library_dependencies hard_links
space_check create_filesystem); space_check create_filesystem find_file_in_path sys);
use strict; use strict;
use File::Basename; use File::Basename;
@ -889,15 +889,15 @@ sub start_logging_output {
print "Logging output to $logfile\n"; print "Logging output to $logfile\n";
} }
##### Same as system() but obeys $::verbosity setting for both STDOUT ##### Same as system() but obeys $verbosity setting for both STDOUT
##### and STDERR. ##### and STDERR.
sub sys { sub sys {
open(SYS, "@_ 2>&1 |") or die "open on sys(@_) failed: $!"; open(SYS, "@_ 2>&1 |") or die "open on sys(@_) failed: $!";
while (<SYS>) { while (<SYS>) {
print LOGFILE; print LOGFILE;
print if $::verbosity > 0; print if $verbosity > 0;
} }
close(SYS) or die "Command failed: @_\nSee logfile for error message.\n"; close(SYS) or return $?;
0; # like system() 0; # like system()
} }