chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
985cefa
)
test suite: tagupl: Break out next-mangle
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sat, 6 Jul 2019 16:44:25 +0000
(17:44 +0100)
committer
Sean Whitton
<spwhitton@spwhitton.name>
Sun, 7 Jul 2019 08:54:19 +0000
(09:54 +0100)
No functional change.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
tests/tests/tagupl
patch
|
blob
|
history
diff --git
a/tests/tests/tagupl
b/tests/tests/tagupl
index c45f5e927d81086e87d79f9f6fdfab36796840e8..e1f4391772064e6b9af79a358f60bf51b5733b6e 100755
(executable)
--- a/
tests/tests/tagupl
+++ b/
tests/tests/tagupl
@@
-46,6
+46,11
@@
perl -i -ne '
print or die $!;
' ../basetag
+next-mangle () {
+ mv ../tagupl/overall.log ../tagupl/overall.log-$ident
+ ident=$1
+}
+
with-mangled () {
local perl=$1
perl <../basetag >../badtag-$ident -pe "$perl"
@@
-55,8
+60,7
@@
with-mangled () {
}
expect-quit () {
- mv ../tagupl/overall.log ../tagupl/overall.log-$ident
- ident=$1
+ next-mangle "$1"
local perl=$2
local mstring=$3
with-mangled "$perl"