[perl-Gtk3] When running tests, display the gtk+ version



commit 2d57612e91634136b79ffd40a90db4cd8474cbe2
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date:   Sat Nov 29 18:45:02 2014 +0100

    When running tests, display the gtk+ version

 t/00-init.t |    5 +++++
 1 files changed, 5 insertions(+), 0 deletions(-)
---
diff --git a/t/00-init.t b/t/00-init.t
index c39bc7d..17a4ec4 100644
--- a/t/00-init.t
+++ b/t/00-init.t
@@ -20,6 +20,11 @@ unless (eval { Gtk3->import; 1 }) {
 plan tests => 2;
 
 SKIP: {
+  diag (sprintf 'Testing against gtk+ %d.%d.%d',
+        Gtk3::get_major_version (),
+        Gtk3::get_minor_version (),
+        Gtk3::get_micro_version ());
+
   @ARGV = qw(--help --name gtk2perl --urgs tree);
   skip 'Gtk3::init_check failed, probably unable to open DISPLAY', 2
     unless Gtk3::init_check ();


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]