From f99bdbfe103a5060e2596a6e9ea1223296773822 Mon Sep 17 00:00:00 2001 From: Dave Smith Date: Thu, 23 Jan 2020 13:27:17 -0600 Subject: [PATCH] Append session_duration if set [issue session_duration not used in set #8] Signed-off-by: Dave Smith --- lib/Dancer2/Session/Memcached.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/Dancer2/Session/Memcached.pm b/lib/Dancer2/Session/Memcached.pm index 48575f5..7f39df3 100644 --- a/lib/Dancer2/Session/Memcached.pm +++ b/lib/Dancer2/Session/Memcached.pm @@ -82,6 +82,9 @@ sub _flush { croak "Memcache cluster unreachable _flush" if $self->fatal_cluster_unreachable && not keys %{$self->_memcached->stats(['misc'])}; + # append session_duration if set + push @_, $self->session_duration if $self->session_duration and $#_ < 2; + return $self->_memcached->set( @_ ); }