From: Tomas Doran <bobtfish@bobtfish.net>
Date: Thu, 21 May 2009 19:46:46 +0000 (+0000)
Subject: I fail at fixing things which don't have tests (redux)
X-Git-Tag: 1.16~5
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=29c46ac88be5792311ff6f4568e7479acdbe3565;p=catagits%2FCatalyst-Devel.git

I fail at fixing things which don't have tests (redux)
---

diff --git a/Changes b/Changes
index 2413ae2..379163f 100644
--- a/Changes
+++ b/Changes
@@ -6,6 +6,8 @@ This file documents the revision history for Perl extension Catalyst-Devel.
           that the restarter is as slow as ever on Win32, but it
           works. Thanks to Rodrigo for the bug report and suggestion
           on how to fix it. (Dave Rolsky)
+        - Actually fix -p option for port number, as I failed to do it
+          right last time as I'm an idiot (t0m)
 
 1.15    2009-05-13 20:02
         - Remove -p option for pid file, and restore it to the port number,
diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm
index 8ab9ad2..c10b438 100644
--- a/lib/Catalyst/Helper.pm
+++ b/lib/Catalyst/Helper.pm
@@ -988,7 +988,7 @@ GetOptions(
     'fork|f'              => \$fork,
     'help|?'              => \$help,
     'host=s'              => \$host,
-    'port=s'              => \$port,
+    'port|p=s'            => \$port,
     'keepalive|k'         => \$keepalive,
     'restart|r'           => \$restart,
     'restartdelay|rd=s'   => \$check_interval,