Parent Directory | Revision Log | Patch
revision 463 by dpavlin, Sun Jan 3 01:19:50 2010 UTC | revision 467 by dpavlin, Mon Jan 4 22:43:03 2010 UTC | |
---|---|---|
# | Line 11 our $path_prefix; | Line 11 our $path_prefix; |
11 | our $reboot_time; # 300 s | our $reboot_time; # 300 s |
12 | ||
13 | use server; | use server; |
14 | use client; | |
15 | use File::Slurp; | use File::Slurp; |
16 | use Carp qw/confess/; | use Carp qw/confess/; |
17 | ||
# | Line 48 sub config_for_ip { | Line 49 sub config_for_ip { |
49 | sub config_ip_boot { | sub config_ip_boot { |
50 | my ( $ip, $boot, $append ) = @_; | my ( $ip, $boot, $append ) = @_; |
51 | ||
52 | my $default; | my $default = client::conf $ip => 'default'; |
53 | my $config; | my $config; |
54 | ||
55 | foreach my $kernel ( glob "$boot/vmlinuz*" ) { | foreach my $kernel ( glob "$boot/vmlinuz*" ) { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |