use lib '../lib';

diff --git a/bin/irspy-rewrite-records.pl b/bin/irspy-rewrite-records.pl
index c80b05d..a560db9 100755 (executable)
--- a/bin/irspy-rewrite-records.pl
+++ b/bin/irspy-rewrite-records.pl
@@ -1,12 +1,14 @@
 #!/usr/bin/perl
 #!/usr/bin/perl

-
+#

 # perl -I ../lib irspy-rewrite-records.pl localhost:8018/IR-Explain---1
 
 # perl -I ../lib irspy-rewrite-records.pl localhost:8018/IR-Explain---1
 

-use strict;
-use warnings;
+use lib '../lib';

 use ZOOM::IRSpy;
 use ZOOM::IRSpy::Utils qw(render_record);
 
 use ZOOM::IRSpy;
 use ZOOM::IRSpy::Utils qw(render_record);
 

+use strict;
+use warnings;
+

 my($dbname) = @ARGV;
 die "$0 no database name specified" if !defined $dbname;
 
 my($dbname) = @ARGV;
 die "$0 no database name specified" if !defined $dbname;