# Copyright (c) 2009 bivio Software, Inc. All Rights Reserved. # $Id: task-log.btest,v 1.8 2010/04/12 00:38:53 nagler Exp $ test_setup('PetShop', 'groupware'); home_page(); do_test_backdoor(TaskLog => 'test_reset'); login_as('btest_read'); sleep(2); follow_menu_link('wiki'); login_as('root'); follow_link('site_hits'); find_page_with_text(qr{>Btest_read.*/site/\w+/StartPage}im); verify_no_text(qr{acting as}); follow_menu_link('all_users'); find_page_with_text('User, Btest_read'); follow_menu_link('User, Btest_read'); home_page(); do_logout(); follow_menu_link('site_hits'); submit_form(Refresh => { '_anon' => 'btest_read', }); find_page_with_text(qr{root.*acting as.*Btest_read.*/bp/StartPage}im); login_as('task_log_user'); follow_menu_link('site_hits'); submit_form(Refresh => { '_anon' => 'user', }); follow_menu_link('next'); verify_uri('b_filter=user'); follow_menu_link('spreadsheet');