# Copyright (c) 2008-2010 bivio Software, Inc.  All Rights Reserved.
# $Id: site-admin.btest,v 1.11 2010/04/12 00:52:10 nagler Exp $
test_setup('PetShop', 'groupware');
home_page();
login_as('site_adm');
follow_menu_link('all_users');
find_page_with_text('User, Demo');
follow_menu_link('User, Demo');
home_page();
follow_menu_link('settings');
verify_form({
    last => 'User',
    size => 15,
});
follow_link('exit');
verify_uri('/site-admin/users');
# clicking  exit on a stale page should put the user at site root
go_back();
follow_link('exit');
home_page();
verify_link('login');
login_as('site_adm');
follow_menu_link('all_users');
find_page_with_text('User, Btest_read');
follow_menu_link('User, Btest_read');
home_page();
follow_menu_link('wiki');
verify_no_text(qr{new page|edit this page}i);
follow_link('exit');
follow_menu_link(qw(site-admin features));
verify_form({
    title => 'Site Admin',
    '^forum' => 'site-admin',
});