From db6defec2a016fb58d4d493dc5b185ccc5e8434d Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Mon, 22 Nov 2010 15:48:32 +0100 Subject: [PATCH] we don't receive duplicates from Mojo::Client this is snippet of left-over code to work around problem with LWP::UserAgent which isn't used any more --- couchdb-changes.pl | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/couchdb-changes.pl b/couchdb-changes.pl index ebdac86..2b0fadb 100755 --- a/couchdb-changes.pl +++ b/couchdb-changes.pl @@ -14,7 +14,6 @@ use JSON::XS; my $url = 'http://localhost:5984/monitor/_changes?feed=continuous;include_docs=true;since='; my $seq = 0; -our $last_id_rev = ''; my $client = Mojo::Client->new; my $json = Mojo::JSON->new; @@ -52,12 +51,7 @@ while( ! $error ) { my $rev = $data->{changes}->[0]->{rev} || warn "no rev?"; $seq = $data->{seq} || warn "no seq?"; - if ( $last_id_rev eq "$id $rev" ) { - warn "# duplicate $last_id_rev\n"; - } else { - $last_id_rev = "$id $rev"; - warn "# ",dump( $data ); - } + warn "# ",dump( $data ); # FIXME custom code here } else { warn "UNKNOWN", dump($data); -- 2.20.1