From 8ce3800b7f663d6deeaaae2feac8bf78d4fdb2c1 Mon Sep 17 00:00:00 2001
From: "jules@lens" <julescarbon@gmail.com>
Date: Sat, 16 Jun 2018 13:21:14 +0200
Subject: fix options

---
 scripts/builders/pair-dataset-link.pl | 18 +++++++-----------
 1 file changed, 7 insertions(+), 11 deletions(-)

(limited to 'scripts')

diff --git a/scripts/builders/pair-dataset-link.pl b/scripts/builders/pair-dataset-link.pl
index a36d816..6b3e136 100755
--- a/scripts/builders/pair-dataset-link.pl
+++ b/scripts/builders/pair-dataset-link.pl
@@ -9,23 +9,19 @@ STDOUT->autoflush(1);
 
 my $sequence_dir;
 my $ab_dir;
-my $dt;
-my $wait;
-my $buzz;
+my $dt = 1;
 GetOptions (
-  "sequence_dir"  => \$sequence_dir,
-  "ab_dir"  => \$ab_dir,
-  "dt" => \$dt,
+  "sequence_dir=s"  => \$sequence_dir,
+  "ab_dir=s"  => \$ab_dir,
+  "dt=i" => \$dt,
 );
 
-print $sequence_dir . "\n";
+print 'sequence_dir: ' . $sequence_dir . "\n";
+print 'ab dir: ' . $ab_dir . "\n";
 if (! $sequence_dir || ! $ab_dir || ! -e $sequence_dir) {
-  print "usage: --sequence_dir ... --ab_dir ... --dt 1\n";
+  print "usage: $0 --sequence_dir ... --ab_dir ... --dt 1\n";
   exit(1);
 }
-if (! $dt) {
-  $dt = 1;
-}
 $sequence_dir .= "/";
 $ab_dir .= "/";
 
-- 
cgit v1.2.3-70-g09d2