From: Dave Rolsky <autarch@urth.org>
Date: Sat, 28 Aug 2010 15:43:36 +0000 (-0500)
Subject: restore alias/excludes warnings
X-Git-Tag: 1.13~29
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3241bc92910d3b6663e052e95b2e18cf1d889268;p=gitmo%2FMoose.git

restore alias/excludes warnings
---

diff --git a/Changes b/Changes
index 0e5832f..5eaf88a 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,13 @@
 Also see Moose::Manual::Delta for more details of, and workarounds
 for, noteworthy changes.
 
+NEXT
+
+  [API CHANGES]
+
+  * The deprecation warnings for alias and excludes are back, use -alias and
+    -excludes instead. (Dave Rolsky)
+
 1.12 Sat, Aug 28, 2010
 
   [BUG FIXES]
diff --git a/lib/Moose/Meta/Role/Application.pm b/lib/Moose/Meta/Role/Application.pm
index 49775b0..19e44e7 100644
--- a/lib/Moose/Meta/Role/Application.pm
+++ b/lib/Moose/Meta/Role/Application.pm
@@ -24,11 +24,11 @@ sub new {
     my ($class, %params) = @_;
 
     if ( exists $params{excludes} || exists $params{alias} ) {
-        # Moose::Deprecated::deprecated(
-        #     feature => 'alias or excludes',
-        #     message =>
-        #         "The alias and excludes options for role application have been renamed -alias and -excludes"
-        # );
+        Moose::Deprecated::deprecated(
+            feature => 'alias or excludes',
+            message =>
+                "The alias and excludes options for role application have been renamed -alias and -excludes"
+        );
     }
 
     if ( exists $params{excludes} && !exists $params{'-excludes'} ) {