xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-05-30 17:46:38 +00:00
Code Issues Releases Wiki Activity

Merge pull request #6729 from chenhanxiao/substitute_by_order

Browse Source 
xcattest: proper replace vars in test cases
This commit is contained in:
Mark Gurevich 2020-06-23 15:33:40 -04:00 committed by GitHub
commit 9c6d0c0ab3
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
xCAT-test/xcattest
View File

@ -1867,9 +1867,11 @@ sub getvar
{
my $str = shift;
my $config_ref = shift;
my @vars = ($str =~ /\$\$(\w+)/g);
my @reverse_sorted_vars = reverse sort @vars;
while ($str =~ /\$\$(\w+)/) {
my $varname = $1;
# let $$AA and $$A have the same chance to be replaced.
for my $varname (@reverse_sorted_vars) {
if (exists($$config_ref{var}{$varname})) {
$str =~ s/\$\$$varname/$$config_ref{var}{$varname}/g;
} else {