Ignore:
Timestamp:
Feb 19, 2010, 5:30:20 AM (14 years ago)
Author:
Bruno Cornec
Message:
  • Fix variable substitution which was too aggressive in pb_distro_get_param
File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb-modules/lib/ProjectBuilder/Distribution.pm

    r974 r982  
    444444}
    445445
    446 # Allow replacement of variables inside the parameter such as ddir, dver, darch for rpmbootstrap
    447 eval { $param =~ s/(\$\w+)/$1/eeg };
    448 
    449 pb_log(2,"DEBUG: pb_distro_get_param on ",Dumper($opt)," returns $param\n");
     446# Allow replacement of variables inside the parameter such as ddir, dver, darch for rpmbootstrap
     447# but not shell variable which ae backslashed
     448if ($param =~ /[^\\]\$/) {
     449    pb_log(3,"Expanding variable on $param\n");
     450    eval { $param =~ s/(\$\w+)/$1/eeg };
     451}
     452
     453pb_log(2,"DEBUG: pb_distro_get_param on $ddir-$dver-$darch returns ==$param==\n");
    450454return($param);
    451455
Note: See TracChangeset for help on using the changeset viewer.