From d02d67f49ac2ef69696465bf8ba36e241dad19ea Mon Sep 17 00:00:00 2001
From: "Dmitry E. Oboukhov" <unera@debian.org>
Date: Mon, 2 Jul 2012 16:20:43 +0400
Subject: [PATCH] increase debugging in test
---
connector/perl/lib/Test/Tarantool.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/connector/perl/lib/Test/Tarantool.pm b/connector/perl/lib/Test/Tarantool.pm
index 14aecb0b9d..189b81711b 100644
--- a/connector/perl/lib/Test/Tarantool.pm
+++ b/connector/perl/lib/Test/Tarantool.pm
@@ -46,7 +46,7 @@ sub run {
my ($module, %opts) = @_;
my $cfg_file = delete $opts{cfg} or croak "config file not defined";
- croak "File not found" unless -r $cfg_file;
+ croak "File not found: $cfg_file" unless -r $cfg_file;
open my $fh, '<:encoding(UTF-8)', $cfg_file or die "$@\n";
local $/;
my $cfg = <$fh>;
--
GitLab