Postpone changing the name so that pod2usage still works.

diff --git a/bin/mythtv-status b/bin/mythtv-status
index 44d245d27b3a26aa2b11a7b9cffcfb1db6bcd59d..3451776b44c54dad15d6078f2960e81457f7772a 100755 (executable)
--- a/bin/mythtv-status
+++ b/bin/mythtv-status
@@ -40,8 +40,6 @@ if ($@ && $@ !~ /^No config file found/) {
   die $@;
 }
 
-$0 = "mythtv-status - parent";
-
 # Some sane defaults.
 $c->{'host'} ||= "localhost";
 $c->{'port'} ||= "6544";
@@ -131,6 +129,8 @@ GetOptions(
 pod2usage(verbose => 1)
   if $help;
 
+$0 = "mythtv-status - parent";
+
 # Get the email address into a format we can use.
 @{ $c->{'email'} } = split(',', join(',', @{ $c->{'email'} }));