From 8569595ba13b345e51d567dcb35c762d174cc096 Mon Sep 17 00:00:00 2001
From: Christopher Anthony <kozure@gmail.com>
Date: Tue, 31 May 2016 12:27:48 -0700
Subject: [PATCH] Fix loop

Iterate through all slots before exiting loop.
---
 lib/Crypt/PKCS11/Easy.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Crypt/PKCS11/Easy.pm b/lib/Crypt/PKCS11/Easy.pm
index 9ad89ea..fb146ab 100644
--- a/lib/Crypt/PKCS11/Easy.pm
+++ b/lib/Crypt/PKCS11/Easy.pm
@@ -427,9 +427,9 @@ sub get_slot {
 
                 # last;
             }
-            die "Unable to find slot containing token labelled '$arg{token}'"
-              unless $slot;
         }
+        die "Unable to find slot containing token labelled '$arg{token}'"
+          unless $slot;
     }
 
     # strip whitespace padding