From: W. Trevor King <wking@drexel.edu>
Date: Thu, 26 May 2011 11:28:13 +0000 (-0400)
Subject: Suppress "Subroutine new redefined at Crypt/Monkeysphere/MSVA.pm line 81."
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=c45f9af19af097df70e79132bbed4adb70fb2837;p=monkeysphere-validation-agent.git

Suppress "Subroutine new redefined at Crypt/Monkeysphere/MSVA.pm line 81."

Following the suggestion given by `use diagnostics;`:

  (W redefine) You redefined a subroutine.  To suppress this warning, say

    {
    no warnings 'redefine';
    eval "sub name { ... }";
    }
---

diff --git a/Crypt/Monkeysphere/MSVA.pm b/Crypt/Monkeysphere/MSVA.pm
index 6442fbb..c1e731d 100755
--- a/Crypt/Monkeysphere/MSVA.pm
+++ b/Crypt/Monkeysphere/MSVA.pm
@@ -78,6 +78,7 @@
     return $logger->log(@_);
   };
 
+  no warnings 'redefine';
   sub new {
     my $class = shift;