From 0087f77d76bf9ad346e5c4ccf7da1942437d3ca5 Mon Sep 17 00:00:00 2001
From: freesource <freesource>
Date: Wed, 15 Nov 2000 05:43:50 +0000
Subject: [PATCH] Modifications to allow gBootRoot changes to work

---
 Yard.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/Yard.pm b/Yard.pm
index 9ac5817..6a3c26f 100644
--- a/Yard.pm
+++ b/Yard.pm
@@ -31,9 +31,9 @@ package Yard;
 use vars qw(@ISA @EXPORT %EXPORT_TAGS);
 use 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 
-              space_check create_filesystem);
+              space_check create_filesystem find_file_in_path sys);
 
 use strict;
 use File::Basename;
@@ -889,15 +889,15 @@ sub start_logging_output {
   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.
 sub sys {
   open(SYS, "@_ 2>&1 |") or die "open on sys(@_) failed: $!";
   while (<SYS>) {
     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()
 }