Mercurial > hg > nginx-tests

diff memcached.t @ 84:e48ac6e9a390

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: die if we failed to put test data into memcached.
author Maxim Dounin <mdounin@mdounin.ru>
date Sun, 12 Apr 2009 06:48:10 +0400
parents 726c3c2a8b8c
children 1c0ec30614c6
line wrap: on
line diff
--- a/memcached.t
+++ b/memcached.t
@@ -68,7 +68,8 @@ EOF
 ###############################################################################
 
 my $memd = Cache::Memcached->new(servers => [ '127.0.0.1:8081' ]);
-$memd->set('/', 'SEE-THIS');
+$memd->set('/', 'SEE-THIS')
+	or die "can't put value into memcached: $!";
 
 like(http_get('/'), qr/SEE-THIS/, 'memcached request');