protocol change: supply list name in the list of lists

[lsl.git] / lib / App / LazyShoppingList / API / v1.pm

diff --git a/lib/App/LazyShoppingList/API/v1.pm b/lib/App/LazyShoppingList/API/v1.pm
index 46995e8acf81a76a985c2ddafa94c64292cff62f..8a30acbc11b227928739df9dcf2f9f7a869c8890 100644 (file)
--- a/lib/App/LazyShoppingList/API/v1.pm
+++ b/lib/App/LazyShoppingList/API/v1.pm
@@ -34,7 +34,8 @@ get '/list' => sub {
             { order_by => { -asc => 'name' } } )->all
         )
     {
-        push @{ $r{lists} }, uri_for( "/list/" . $list->id );
+        push @{ $r{lists} },
+            { uri => uri_for( "/list/" . $list->id ), name => $list->name };
     }
 
     $dbh->txn_commit;