Changeset 1530 in ProjectBuilder for devel/pb-modules/lib/ProjectBuilder/VE.pm

Timestamp:

May 12, 2012, 3:36:08 AM (12 years ago)

Author:

Bruno Cornec

Message:

• ossueminorrel option now initialized first, and correectly. Removes warnings.
• other smaller fixes for CMD usage

File:

• devel/pb-modules/lib/ProjectBuilder/VE.pm (modified) (1 diff)

devel/pb-modules/lib/ProjectBuilder/VE.pm

@@ -100 +100 @@
         foreach my $proxy (qw/http_proxy ftp_proxy/) {
             if (defined $ENV{$proxy}) {
-                open(<CMD>,"sudo sh -c 'echo \$$proxy' |") or die "can't run sudo sh?: $!";
+                open(CMD,"sudo sh -c 'echo \$$proxy' |") or die "can't run sudo sh?: $!";
                 $_ = <CMD>;
                 chomp();
                 die "sudo not passing through env var $proxy; '$ENV{$proxy}' != '$_'\nAdd line Defaults:`whoami` env_keep += \"$proxy\" to sudoers file?" unless $_ eq $ENV{$proxy};
+                close(CMD);
             }
         }
+    }
     # Handle cross arch on Intel based platforms
     $sudocmd = "setarch i386 $sudocmd" if (($pbos->{arch} =~ /i?86/) && ($arch eq 'x86_64'));