From cc67afb5297b9309416e2c37a414af3ec3e1f8ba Mon Sep 17 00:00:00 2001
From: Tony Cook <tony@develop-help.com>
Date: Mon, 18 Oct 2010 10:44:16 +0000
Subject: [PATCH] sanity tests for multi-monitor grab

---
 t/10win32.t | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/t/10win32.t b/t/10win32.t
index 5a50359..086c1a4 100644
--- a/t/10win32.t
+++ b/t/10win32.t
@@ -16,7 +16,7 @@ use Imager::Screenshot 'screenshot';
 Imager::Screenshot->have_win32
     or plan skip_all => "No Win32 support";
 
-plan tests => 13;
+plan tests => 15;
 
 {
   my $im = screenshot(hwnd => 0);
@@ -53,3 +53,9 @@ plan tests => 13;
   is($im->tags(name => 'ss_window_height'), 30 + $im->getheight + 17,
      "check image height against window size");
 }
+
+{ # full multi-monitor desktop
+  my $im = screenshot(hwnd => 0, monitor => -1);
+  ok($im, "full desktop");
+  is($im->getchannels, 4, "should have an alpha channel");
+}
-- 
2.30.2