From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 22 Nov 2010 14:48:32 +0000 (+0100)
Subject: we don't receive duplicates from Mojo::Client
X-Git-Url: http://git.rot13.org/?p=angular-mojolicious.git;a=commitdiff_plain;h=db6defec2a016fb58d4d493dc5b185ccc5e8434d

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
---

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);