← Commit list

319298484f

Viktor Szakats
Viktor Szakats
2025-12-11
SUCCESS Duration: 208s

Subject

runtests: add support for single-quoted attributes, use it

Binary

No binary (build failed)

Architecture & Compiler Flags

Architecture: x86_64-linux-gnu Compiler: gcc (Ubuntu 11.4.0-1ubuntu1~22.04.3) 11.4.0

—

Build Log

(log yok)

Commit Diff GitHub →

tests/data/test1158+1 -2
@@ -3,7 +3,6 @@
<keywords>
HTTP
HTTP FORMPOST
-notxml
</keywords>
</info>
# Server-side
@@ -37,7 +36,7 @@ http://%HOSTIP:%HTTPPORT/we/want/%TESTNUMBER
-F 'file3=@"%LOGDIR/test%TESTNUMBER\".txt";type=m/f,"%LOGDIR/test%TESTNUMBER\".txt"'
</command>
# We create this file before the command is invoked!
-<file name=%LOGDIR/test%TESTNUMBER".txt>
+<file name='%LOGDIR/test%TESTNUMBER".txt'>
foo bar
This is a bar foo
bar
tests/data/test1186+1 -2
@@ -3,7 +3,6 @@
<keywords>
HTTP
HTTP FORMPOST
-notxml
</keywords>
</info>
# Server-side
@@ -37,7 +36,7 @@ http://%HOSTIP:%HTTPPORT/we/want/%TESTNUMBER --form-escape
-F 'file3=@"%LOGDIR/test%TESTNUMBER\".txt";type=m/f,"%LOGDIR/test%TESTNUMBER\".txt"'
</command>
# We create this file before the command is invoked!
-<file name=%LOGDIR/test%TESTNUMBER".txt>
+<file name='%LOGDIR/test%TESTNUMBER".txt'>
foo bar
This is a bar foo
bar
tests/getpart.pm+4 -2
@@ -76,9 +76,10 @@ sub testcaseattr {
for(@xml) {
if(($_ =~ /^ *\<testcase ([^>]*)/)) {
my $attr=$1;
- while($attr =~ s/ *([^=]*)= *(\"([^\"]*)\"|([^\> ]*))//) {
+ while($attr =~ s/ *([^=]*)= *(\"([^\"]*)\"|\'([^\']*)\')//) {
my ($var, $cont)=($1, $2);
$cont =~ s/^\"(.*)\"$/$1/;
+ $cont =~ s/^\'(.*)\'$/$1/;
$hash{$var}=$cont;
}
}
@@ -108,9 +109,10 @@ sub getpartattr {
$inside++;
my $attr=$1;
- while($attr =~ s/ *([^=]*)= *(\"([^\"]*)\"|([^\> ]*))//) {
+ while($attr =~ s/ *([^=]*)= *(\"([^\"]*)\"|\'([^\']*)\')//) {
my ($var, $cont)=($1, $2);
$cont =~ s/^\"(.*)\"$/$1/;
+ $cont =~ s/^\'(.*)\'$/$1/;
$hash{$var}=$cont;
}
last;