remove pointless exit 0

[scpubgit/App-EzPz.git] / bin / ezpz-repl

diff --git a/bin/ezpz-repl b/bin/ezpz-repl
index fff851c..8fbb122 100755 (executable)
--- a/bin/ezpz-repl
+++ b/bin/ezpz-repl
@@ -1,9 +1,13 @@
 #!/usr/bin/env perl
 
+use lib (-d 'lib' ? ('lib') : ());
 use File::Which;
 use Email::EzPz::List;
 use strictures 1;
 
+die "Usage: ezpz-repl ezmlm-bindir list-dir"
+  unless @ARGV == 2;
+
 {
   package Eval::WithLexicals::Scratchpad;
 
@@ -16,5 +20,3 @@ use strictures 1;
 }
 
 do +which('tinyrepl');
-
-exit 0;