aboutsummaryrefslogtreecommitdiff
path: root/runtest.exp
diff options
context:
space:
mode:
authorAndreas Schwab <schwab@linux-m68k.org>2012-06-15 20:42:58 +1000
committerBen Elliston <bje@gnu.org>2012-06-15 20:42:58 +1000
commit57c22601afe43d2c2b8819df4f2ecacb034516fd (patch)
tree487709dbca787847c62ba3630d24292daddd4b78 /runtest.exp
parent2939bf452ee0afa910426c1ecf4c0f2aeff68ed3 (diff)
downloaddejagnu-57c22601afe43d2c2b8819df4f2ecacb034516fd.zip
dejagnu-57c22601afe43d2c2b8819df4f2ecacb034516fd.tar.gz
dejagnu-57c22601afe43d2c2b8819df4f2ecacb034516fd.tar.bz2
* lib/framework.exp (clone_output): Protect from leading dash in
$message. * runtest.exp (verbose): Likewise. Signed-off-by: Ben Elliston <bje@gnu.org>
Diffstat (limited to 'runtest.exp')
-rw-r--r--runtest.exp5
1 files changed, 2 insertions, 3 deletions
diff --git a/runtest.exp b/runtest.exp
index a7ad7a0..78da782 100644
--- a/runtest.exp
+++ b/runtest.exp
@@ -185,7 +185,6 @@ proc verbose { args } {
set message [lindex $args $i]
if { $verbose >= $level } {
- # There is no need for the "--" argument here, but play it safe.
# We assume send_user also sends the text to the log file (which
# appears to be the case though the docs aren't clear on this).
if { $newline } {
@@ -195,9 +194,9 @@ proc verbose { args } {
}
} elseif { $logfile } {
if { $newline } {
- send_log "$message\n"
+ send_log -- "$message\n"
} else {
- send_log "$message"
+ send_log -- "$message"
}
}
}