summaryrefslogtreecommitdiff
path: root/tests/server/backend-t.in
diff options
context:
space:
mode:
Diffstat (limited to 'tests/server/backend-t.in')
-rw-r--r--tests/server/backend-t.in9
1 files changed, 4 insertions, 5 deletions
diff --git a/tests/server/backend-t.in b/tests/server/backend-t.in
index 0b65c07..bc708f2 100644
--- a/tests/server/backend-t.in
+++ b/tests/server/backend-t.in
@@ -9,7 +9,6 @@
# See LICENSE for licensing terms.
use strict;
-use IO::String;
use Test::More tests => 1263;
# Create a dummy class for Wallet::Server that prints what method was called
@@ -171,10 +170,10 @@ eval { do '@abs_top_srcdir@/server/wallet-backend' };
# Wallet::Server class.
sub run_backend {
my (@args) = @_;
- my $result;
- my $output = IO::String->new (\$result);
- $output->autoflush (1);
- select $output;
+ my $result = '';
+ open (OUTPUT, '>', \$result) or die "cannot create output string: $!\n";
+ select OUTPUT;
+ local $| = 1;
eval { command (@args) };
my $error = $@;
select STDOUT;