yaz/commit

UPDATE - select gardening interface

authorMichiel Hildebrand
Tue Nov 8 09:03:26 2011 +0100
committerMichiel Hildebrand
Tue Nov 8 09:03:26 2011 +0100
commitee15d48d82f0935b6eeeb6e181c70c01203d6672
treed7f9a88d68813a2637d366bc2ea21282af0a6860
parentb545f2d6bded09c55283b3976158761d7e744825
Diff style: patch stat
diff --git a/applications/yaz_garden.pl b/applications/yaz_garden.pl
index 41dde2e..eafbbf8 100644
--- a/applications/yaz_garden.pl
+++ b/applications/yaz_garden.pl
@@ -74,19 +74,19 @@ http_yaz_garden_accept(Request) :-
 			[ video(Video,
 				[description('Current video')])
 			]),
-	http_link_to_id(http_yaz_shot, [video(Video)], Garden),
-	throw(http_reply(moved_temporary(Garden))).
-/*
+	http_link_to_id(http_yaz_shot, [video(Video)], ShotAnnotation),
+	http_link_to_id(http_yaz_garden, [video(Video)], TagGarden),
+%	throw(http_reply(moved_temporary(Garden))).
 	reply_html_page(yaz,
 			[ title(['YAZ accept - ', Video])
 			],
 			[ div(['You accepted to moderate ', Video]),
-			  div([a(href(HREF), 'start gardening'),
-			       ' or go back to ',
-			       a(href(location_by_id(http_yaz_home)), 'your videos')
-			      ])
+			  ul([li(['Start tag gardening I:',
+				  a(href(TagGarden), ' cleanup tags')]),
+			      li(['Start tag gardening II:',
+				  a(href(ShotAnnotation), ' annotate video shots')])
+			     ])
 			]).
-*/
 
 %%	http_yaz_garden_remove(+Request)
 %