Delete unused access method

diff --git a/ILS/Patron.pm b/ILS/Patron.pm
index 1fa5cf6..c3003fe 100644 (file)
--- a/ILS/Patron.pm
+++ b/ILS/Patron.pm
@@ -186,12 +186,6 @@ sub items_billed {
     return $self->{items_billed};
 }
 
-sub password {
-    my $self = shift;
-
-    return $self->{password};
-}
-
 sub check_password {
     my ($self, $pwd) = @_;