Merge pull request #7 from tonycoz/warnsprintf

ensure perl 5.22 won't warn about format vs argument list mis-matches
abw · Apr 7, 2015 · 52af400 · 52af400
2 parents 2a48006 + 0cfaee5
commit 52af400
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/lib/Badger/Utils.pm b/lib/Badger/Utils.pm
@@ -182,6 +182,7 @@ sub xprintf {
                 ? _xprintf_ifdef(\@args, $1, $2, $3)
                 : '%' . $1 . '$' . ($2 || 's')
         }egx;
+    no if $] > 5.021, warnings => "redundant";
     sprintf($format, @_);
 }