gnome-perl-introspection r44 - trunk/PDF-Poppler/t
- From: tsch svn gnome org
- To: svn-commits-list gnome org
- Subject: gnome-perl-introspection r44 - trunk/PDF-Poppler/t
- Date: Sun, 16 Nov 2008 11:19:30 +0000 (UTC)
Author: tsch
Date: Sun Nov 16 11:19:30 2008
New Revision: 44
URL: http://svn.gnome.org/viewvc/gnome-perl-introspection?rev=44&view=rev
Log:
Remove now unneeded SKIPs and TODOs.
Modified:
trunk/PDF-Poppler/t/PopplerLinkMapping.t
trunk/PDF-Poppler/t/PopplerPage.t
trunk/PDF-Poppler/t/PopplerRectangle.t
Modified: trunk/PDF-Poppler/t/PopplerLinkMapping.t
==============================================================================
--- trunk/PDF-Poppler/t/PopplerLinkMapping.t (original)
+++ trunk/PDF-Poppler/t/PopplerLinkMapping.t Sun Nov 16 11:19:30 2008
@@ -12,9 +12,7 @@
isa_ok(my $rectangle = $mapping -> area(), "PDF::Poppler::Rectangle");
-TODO: {
- local $TODO = "writing to structs does not work yet";
-
+{
$rectangle -> x1(1.234);
$rectangle -> y1(2.134);
$rectangle -> x2(3.124);
Modified: trunk/PDF-Poppler/t/PopplerPage.t
==============================================================================
--- trunk/PDF-Poppler/t/PopplerPage.t (original)
+++ trunk/PDF-Poppler/t/PopplerPage.t Sun Nov 16 11:19:30 2008
@@ -50,13 +50,9 @@
isa_ok($regions[0], "Gtk2::Gdk::Region");
}
-SKIP: {
- skip 'render_selection_to_pixbuf is broken currently', 0;
-
- my $blue = Gtk2::Gdk::Color -> new(0, 65535, 0);
- $page -> render_selection_to_pixbuf(
- 1.0, 0, $pixbuf,
- $rectangles[0], $rectangles[0],
- 'line',
- $blue, $blue);
-}
+my $blue = Gtk2::Gdk::Color -> new(0, 65535, 0);
+$page -> render_selection_to_pixbuf(
+ 1.0, 0, $pixbuf,
+ $rectangles[0], $rectangles[0],
+ 'line',
+ $blue, $blue);
Modified: trunk/PDF-Poppler/t/PopplerRectangle.t
==============================================================================
--- trunk/PDF-Poppler/t/PopplerRectangle.t (original)
+++ trunk/PDF-Poppler/t/PopplerRectangle.t Sun Nov 16 11:19:30 2008
@@ -15,11 +15,7 @@
$rectangle -> x2(3.124);
$rectangle -> y2(4.123);
-TODO: {
- local $TODO = "writing to structs does not work yet";
-
- is($rectangle -> x1(), 1.234);
- is($rectangle -> y1(), 2.134);
- is($rectangle -> x2(), 3.124);
- is($rectangle -> y2(), 4.123);
-}
+is($rectangle -> x1(), 1.234);
+is($rectangle -> y1(), 2.134);
+is($rectangle -> x2(), 3.124);
+is($rectangle -> y2(), 4.123);
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]