diff options
Diffstat (limited to 'utils')
| -rwxr-xr-x | utils/redirector.pl.in | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/utils/redirector.pl.in b/utils/redirector.pl.in index 555006374..fb8daf251 100755 --- a/utils/redirector.pl.in +++ b/utils/redirector.pl.in @@ -186,8 +186,8 @@ sub memcached_check_url { my ( $url ) = @_; my $context = Digest->new("SHA-256"); - - return $memd->get(unpack("H*", ($context->hash($url)))); + $context->update($url); + return $memd->get($context->digest()); } # Write url to memcached key @@ -196,8 +196,8 @@ sub memcached_cache_url { if ($url ne $url_real) { my $context = Digest->new("SHA-256"); - - $memd->set(unpack("H*", ($context->hash($url))), $url_real, + $context->update($url); + $memd->set($context->digest(), $url_real, $cfg{cache_expire}); } } |