yaz/commit
UPDATE - select gardening interface
author | Michiel Hildebrand |
---|---|
Tue Nov 8 09:03:26 2011 +0100 | |
committer | Michiel Hildebrand |
Tue Nov 8 09:03:26 2011 +0100 | |
commit | ee15d48d82f0935b6eeeb6e181c70c01203d6672 |
tree | d7f9a88d68813a2637d366bc2ea21282af0a6860 |
parent | b545f2d6bded09c55283b3976158761d7e744825 |
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) %