/[gentoo-perl]/g-cpan/trunk/lib/Gentoo/Portage.pm
Gentoo

Diff of /g-cpan/trunk/lib/Gentoo/Portage.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 136 Revision 137
37 37
38our $VERSION = '0.01'; 38our $VERSION = '0.01';
39 39
40 40
41#IMPORT VARIABLES 41#IMPORT VARIABLES
42foreach my $file ( "/etc/make.globals", "/etc/make.conf" ) { 42foreach my $file ( "/etc/make.globals", "/etc/make.conf", "$ENV{HOME}/.gcpanrc" ) {
43 if ( -f $file) { 43 if ( -f $file) {
44 my $importer = Shell::EnvImporter->new( 44 my $importer = Shell::EnvImporter->new(
45 file => $file, 45 file => $file,
46 shell => 'bash', 46 shell => 'bash',
47 auto_run => 1, 47 auto_run => 1,
48 auto_import => 1, 48 auto_import => 1,
49 import_added => 1, 49 import_added => 1,
50 import_modified => 1,
50 ); 51 );
51 $importer->shellobj->envcmd('set'); 52 $importer->shellobj->envcmd('set');
52 $importer->run(); 53 $importer->run();
54 $importer->env_import();
53 } 55 }
54 56
55} 57}
56if ( -f "$ENV{HOME}/.gcpanrc" )
57{
58 my $importer = Shell::EnvImporter->new(
59 file => "$ENV{HOME}/.gcpanrc",
60 shell => 'bash',
61 auto_run => 1,
62 auto_import => 1,
63 import_added => 1,
64 );
65 $importer->shellobj->envcmd('set');
66 $importer->run();
67}
68
69 58
70# Description: 59# Description:
71# @listOfEbuilds = getAvailableEbuilds($PORTDIR, category/packagename); 60# @listOfEbuilds = getAvailableEbuilds($PORTDIR, category/packagename);
72sub getAvailableEbuilds { 61sub getAvailableEbuilds {
73 my $self = shift; 62 my $self = shift;

Legend:
Removed from v.136  
changed lines
  Added in v.137

  ViewVC Help
Powered by ViewVC 1.1.20