[perl-Gtk2/stable-1-22] Fix GtkPrintSettings.t failures



commit d4d811f090e523c68226b9d27e519fd134a76ec3
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date:   Sun Feb 28 15:24:11 2010 +0100

    Fix GtkPrintSettings.t failures
    
    Don't assume 0 for the default values of get_printer_lpi(),
    get_resolution_x() and _y().  Fixes RT #50190.

 t/GtkPrintSettings.t |    7 ++-----
 1 files changed, 2 insertions(+), 5 deletions(-)
---
diff --git a/t/GtkPrintSettings.t b/t/GtkPrintSettings.t
index a4b5781..2bd7a1d 100644
--- a/t/GtkPrintSettings.t
+++ b/t/GtkPrintSettings.t
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 use strict;
 use Gtk2::TestHelper
-  tests => 26,
+  tests => 23,
   at_least_version => [2, 10, 0, 'GtkPrintSettings: it is new in 2.10'];
 
 # $Id$
@@ -113,17 +113,14 @@ SKIP: {
 }
 
 SKIP: {
-  skip 'new 2.16 stuff', 6
+  skip 'new 2.16 stuff', 3
     unless Gtk2->CHECK_VERSION(2, 16, 0);
 
   my $settings = Gtk2::PrintSettings -> new();
 
-  is($settings -> get_printer_lpi(), 0);
   $settings -> set_printer_lpi(3.1416);
   delta_ok($settings -> get_printer_lpi(), 3.1416);
 
-  is($settings -> get_resolution_x(), 0);
-  is($settings -> get_resolution_y(), 0);
   $settings -> set_resolution_xy(10, 20);
   is($settings -> get_resolution_x(), 10);
   is($settings -> get_resolution_y(), 20);



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