[Bast-commits] r5420 - trunk/PhotoOp/lib/PhotoOp/Controller

[castaway at dev.catalyst.perl.org]

Author: castaway
Date: 2009-02-07 13:43:35 +0000 (Sat, 07 Feb 2009)
New Revision: 5420

Modified:
   trunk/PhotoOp/lib/PhotoOp/Controller/Root.pm
Log:
Only request flickr sets if flickr is authed


Modified: trunk/PhotoOp/lib/PhotoOp/Controller/Root.pm
===================================================================
--- trunk/PhotoOp/lib/PhotoOp/Controller/Root.pm	2009-02-07 13:40:41 UTC (rev 5419)
+++ trunk/PhotoOp/lib/PhotoOp/Controller/Root.pm	2009-02-07 13:43:35 UTC (rev 5420)
@@ -144,8 +144,10 @@
       }
     }
 
-    my $sets = $c->model('MyFlickr')->execute_method('flickr.photosets.getList');
-    $c->log->_dump($sets);
+    if($c->stash->{authenticated}) {
+        my $sets = $c->model('MyFlickr')->execute_method('flickr.photosets.getList');
+        $c->log->_dump($sets);
+    }
 
     $c->stash->{edittags} = { map {$_ => 1} @{ $c->config->{edittags} } };
     $c->stash->{showtags} = $c->config->{showtags};