From: Jonathan Rockway <jon@jrock.us>
Date: Tue, 31 Mar 2009 09:43:19 +0000 (-0500)
Subject: fix usage line in MX::Getopt scripts
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c4e3f06e417bfc0654dd2b61b3b678943a0b407a;p=gitmo%2FMooseX-Runnable.git

fix usage line in MX::Getopt scripts
---

diff --git a/bin/mx-run b/bin/mx-run
index 3bad429..192f81d 100644
--- a/bin/mx-run
+++ b/bin/mx-run
@@ -13,6 +13,8 @@ sub run {
     unshift @INC, $_ for @$includes;
     help() unless $app;
 
+    local $0 = "mx-run ... $app";
+
     return MooseX::Runnable::Invocation->new(
         class   => $app,
         plugins => $plugins || [],