From: Emmanuel Rodriguez <emmanuel.rodriguez@gmail.com>
Date: Sat, 27 Jun 2009 21:20:37 +0000 (+0200)
Subject: Show no more than 10 images
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f2d083d6bf9a16f02e5efbea4283a992178503b6;p=libchamplain

Show no more than 10 images
---

diff --git a/bindings/perl/Champlain/examples/flickr.pl b/bindings/perl/Champlain/examples/flickr.pl
index fdecdfd..6779b4b 100755
--- a/bindings/perl/Champlain/examples/flickr.pl
+++ b/bindings/perl/Champlain/examples/flickr.pl
@@ -135,7 +135,7 @@ sub flickr_photos_search_callback {
 	my $doc = $parser->parse_string($xml);
 
 
-	my @nodes = $doc->findnodes('/rsp/photos/photo[position()]');
+	my @nodes = $doc->findnodes('/rsp/photos/photo[position() < 10]');
 	my @photos = ();
 	foreach my $photo_node (@nodes) {
 		my $id = $photo_node->getAttribute('id');