thinko fixing the thinko :D one should test before commiting

[migration-tools.git] / emig

diff --git a/emig b/emig
index 3d53a6c..8d5e986 100755 (executable)
--- a/emig
+++ b/emig
@@ -45,6 +45,8 @@ Using B<mig> should go something like this:
 
 =item mig add patrons.tsv # tracks an incoming data file; repeat for additional files
 
+=item mig bibstats foo.mrc # get summarized data about bibs and export barcode list
+
 =item mig iconv patrons.tsv # convert it to UTF8, creating patrons.tsv.utf8
 
 =item mig clean patrons.tsv # cleans the file, creating patrons.tsv.utf8.clean
@@ -283,9 +285,9 @@ use Env qw(
 );
 use Pod::Usage;
 use FindBin;
-my $mig_bin = "$FindBin::Bin/mig-bin/";
-use lib "$FindBin::Bin/mig-bin";
-use Mig;
+my $mig_bin = "$FindBin::Bin/emig.d/bin/";
+use lib "$FindBin::Bin/emig.d/bin";
+use EMig;
 
 pod2usage(-verbose => 2) if ! $ARGV[0];
 switch($ARGV[0]) {
@@ -322,7 +324,7 @@ switch($ARGV[0]) {
 sub standard_invocation {
     my $cmd = shift;
 
-    if ($cmd ne 'env') { Mig::die_if_no_env_migschema(); }
+    if ($cmd ne 'env') { EMig::die_if_no_env_migschema(); }
     if (-e $mig_bin . "mig-$cmd") {
         system( $mig_bin . "mig-$cmd", @_ );
     } else {