From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 31 Dec 2019 12:33:24 +0000 (+0000)
Subject: import-catacomb-crypto: Add use strict and fix a bug revealed
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=57da5d597669038911cc2a278f0299f43edf8326;p=secnet.git

import-catacomb-crypto: Add use strict and fix a bug revealed

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/import-catacomb-crypto b/import-catacomb-crypto
index 98a0963..c71359c 100755
--- a/import-catacomb-crypto
+++ b/import-catacomb-crypto
@@ -19,6 +19,7 @@
 ### version 3 along with secnet; if not, see
 ### https://www.gnu.org/licenses/gpl.html.
 
+use strict;
 use autodie;
 
 use IPC::System::Simple qw{runx capturex $EXITVAL};
@@ -40,7 +41,7 @@ sub moan ($) { print STDERR "$PROG: $_[0]\n"; }
 
 my %DONOR_PATH_MAP = ();
 my %DONOR_REV_MAP = ();
-my $RECIP_CACHE = ();
+my %RECIP_CACHE = ();
 
 sub note_path ($$) {
   my ($donor, $recip) = @_;