/[pxelator]/lib/PXElator/config.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/config.pm

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

revision 271 by dpavlin, Wed Aug 19 22:48:54 2009 UTC revision 273 by dpavlin, Wed Aug 19 23:12:18 2009 UTC
# Line 11  use file; Line 11  use file;
11    
12  use File::Slurp;  use File::Slurp;
13    
14    our $mounted;
15    
16  sub available { qw/debian_live webconverger debirf tinycore nfsroot/ };  sub available { qw/debian_live webconverger debirf tinycore nfsroot/ };
17    
18  sub debian_live {  sub debian_live {
# Line 48  L<http://webconverger.org/> Line 50  L<http://webconverger.org/>
50  sub webconverger {  sub webconverger {
51          my ($ip) = @_;          my ($ip) = @_;
52    
53          upstream::iso( 'http://download.webconverger.com/webc-5.2.iso' );          $mounted->{$ip} ||= upstream::iso( 'http://download.webconverger.com/webc-5.2.iso' );
54    
55          my $homepage = client::conf( $ip => 'homepage', default => "http://${server::ip}:7777/client" );          my $homepage = client::conf( $ip => 'homepage', default => "http://${server::ip}:7777/client" );
56          my $hostname = client::conf( $ip => 'hostname' ) || 'webconverger';          my $hostname = client::conf( $ip => 'hostname' ) || 'webconverger';
# Line 106  sub in_chroot { Line 108  sub in_chroot {
108          system "sudo chroot $dir sh -x /tmp/inside.sh";          system "sudo chroot $dir sh -x /tmp/inside.sh";
109  }  }
110    
 our $mounted;  
   
111  sub nfsroot {  sub nfsroot {
112          my $ip = shift;          my $ip = shift;
113    
Legend:
Removed from v.271  
changed lines
  Added in v.273
  ViewVC Help
Powered by ViewVC 1.1.26