expire LDAP and CRM entries after 15 min

[APKPM.git] / lib / APKPM / LDAP.pm

diff --git a/lib/APKPM/LDAP.pm b/lib/APKPM/LDAP.pm
index f734ec2..2dbad19 100644 (file)
--- a/lib/APKPM/LDAP.pm
+++ b/lib/APKPM/LDAP.pm
@@ -58,7 +58,11 @@ sub search : Job : Encode(e_json) : MinProcesses(0) {
                        }
                }
                push @$entries, $e;
-               $redis->set( 'LDAP.' . $e->{cn} => $self->e_json($e) );
+
+               my $key = 'LDAP.' . $e->{cn};
+               $redis->set( $key => $self->e_json($e) );
+               $redis->expire( $key => 15 * 60 );
+
        }
 #      warn "## entries = ",dump $entries;
        return $entries;