From 6a96242e1f9927e3fbe31b9470fa3c8394e246ff Mon Sep 17 00:00:00 2001 From: h_vogt Date: Sun, 15 Jan 2012 16:34:34 +0000 Subject: [PATCH] '/' removed from $platform (mingw/msys) --- ChangeLog | 4 ++++ tests/bin/modelQaTestRoutines.pm | 3 +-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 7e30bef87..245ffc99c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2012-01-15 Holger Vogt + * tests\bin\modelQaTestRoutines.pm: $platform + should not contain '/' , removed in line 700 + 2012-01-13 Robert Larice * src/spicelib/devices/hisimhv/.cvsignore : add missing .cvsignore file diff --git a/tests/bin/modelQaTestRoutines.pm b/tests/bin/modelQaTestRoutines.pm index 08f733e65..e23b28989 100644 --- a/tests/bin/modelQaTestRoutines.pm +++ b/tests/bin/modelQaTestRoutines.pm @@ -697,8 +697,7 @@ sub platform { open(UNAME,"uname -r|");chomp($osVer =);close(UNAME); } $platform = "${archName}_${osName}_${osVer}"; - $platform =~ s/\(//; - $platform =~ s/\)//; + $platform =~ s|[()/]||g; return($platform); }