[RT18107] clean up access_pathmap.pl
authorLiam Whalen <liam.whalen@bc.libraries.coop>
Mon, 16 Dec 2013 23:00:45 +0000 (15:00 -0800)
committerLiam Whalen <liam.whalen@bc.libraries.coop>
Mon, 16 Dec 2013 23:00:45 +0000 (15:00 -0800)
I left a few artifacts from testing in access_pathmap.pl.  These are
removed with this commit.

Signed-off-by: Liam Whalen <liam.whalen@bc.libraries.coop>
deployment/access_pathmap.pl

index 58b21c3..83c17d3 100755 (executable)
@@ -4,13 +4,13 @@ use warnings;
 use Config::Simple;
 use Getopt::Long;
 
-my ($help, $config_file, $component, $srcpath, $host); 
+my ($help, $config_file, $component, $srcpath); 
 
 GetOptions(
     'help'              => \$help,              # show help message and exit
     'config=s'          => \$config_file,       # INI file for path mappings
     'component=s'       => \$component,         # The component to grab the source paths for
-    'srcpath=s'         => \$srcpath,           # The source path to grap the destination path for
+    'srcpath=s'         => \$srcpath            # The source path to grap the destination path for
 );
 
 if ($help) {