From: Shawn M Moore <sartak@gmail.com>
Date: Mon, 15 Jun 2009 18:50:25 +0000 (-0400)
Subject: Don't warn about squirrel deprecations
X-Git-Tag: 0.24
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b03fda9f71bd6f81a435f1df67be4131da86189d;p=gitmo%2FMouse.git

Don't warn about squirrel deprecations
---

diff --git a/Changes b/Changes
index 5ad7070..1e07dc5 100644
--- a/Changes
+++ b/Changes
@@ -11,6 +11,8 @@ Revision history for Mouse
 
     * Fix failing tests by requiring a newer Moose in that test (Sartak)
 
+    * Don't warn in tests about Squirrel deprecations (Sartak)
+
 0.23 Wed May 27 16:52:28 2009
     * Take the mro::linearized_isa DEMOLISHALL fix from Moose
       (originally by doy)
diff --git a/t/201-squirrel.t b/t/201-squirrel.t
index 8a37731..c2fb73b 100644
--- a/t/201-squirrel.t
+++ b/t/201-squirrel.t
@@ -6,6 +6,11 @@ use warnings;
 use Test::More;
 use Scalar::Util 'blessed';
 
+# Don't spew deprecation warnings onto the user's screen
+BEGIN {
+    $SIG{__WARN__} = sub { warn $_[0] if $_[0] !~ /Squirrel is deprecated/ };
+}
+
 do {
     package Foo;
     use Squirrel;