[gentoo-commits] proj/ufed:master commit in: /

["Sven Eden" <sven.eden@gmx.de>]

commit:     006dcae3e2abadc1773b2d762b0f661ad69da851
Author:     Sven Eden <sven.eden <AT> gmx <DOT> de>
AuthorDate: Wed Jan 16 13:42:30 2013 +0000
Commit:     Sven Eden <sven.eden <AT> gmx <DOT> de>
CommitDate: Wed Jan 16 13:42:30 2013 +0000
URL:        http://git.overlays.gentoo.org/gitweb/?p=proj/ufed.git;a=commit;h=006dcae3

Portage.pm: get_eprefix() now filteres warnings from portageq and
writes them seperately out to stderr. Therefore warnings, like
invalid contents in FEATURES, no longer break determining EPREFIX.

---
 Portage.pm |   13 ++++++++++++-
 1 files changed, 12 insertions(+), 1 deletions(-)

diff --git a/Portage.pm b/Portage.pm
index 5443cf4..4b34372 100644
--- a/Portage.pm
+++ b/Portage.pm
@@ -59,8 +59,19 @@ if($lastorder ne 'conf') {
 
 
 sub get_eprefix() {
-	$eprefix = `portageq envvar EPREFIX 2>&1`;
+	my $tmp = "/tmp/ufed_$$.tmp";
+	$eprefix = qx{portageq envvar EPREFIX 2>$tmp};
 	die "Couldn't determine EPREFIX from Portage" if $? != 0;
+
+	if ( -s $tmp ) {
+		my $fTmp = undef;
+		if (open ($fTmp, "<", $tmp)) {
+			print STDERR "$_" while (<$fTmp>);
+			close $fTmp;
+		}
+	}
+	-e $tmp and unlink $tmp;
+
 	chomp($eprefix);
 }