Changeset 5226 in /cluster/svnroot


Ignore:
Timestamp:
Jul 10, 2015 1:20:20 PM (5 years ago)
Author:
skylar
Message:

new data structure for get_boot_flags_from_NIC re #950

File:
1 edited

Legend:

Unmodified
Added
Removed
  • bccd-ng/branches/skylar/bccd-3.4.0/trees/usr/local/lib/site_perl/Bccd.pm

    r5225 r5226  
    30693069}
    30703070
     3071
    30713072sub get_boot_flags_from_NIC{
    30723073    my ($self,$request) = @_;
     
    31103111        my $boot_flags = "#!/bin/sh\nexport BCCD_NIC=$self->{bccd_nic}\n";     
    31113112       
    3112         foreach my $key(keys %request){
     3113        foreach my $key(keys %{$request}){
    31133114            my $value;
    3114             my $pointer = $request{$key};
     3115            my $pointer = $request->{$key};
    31153116            my ($index,$length) = split(/,/,$pointer);
    31163117           
Note: See TracChangeset for help on using the changeset viewer.