# Copyright (c) 2009 bivio Software Inc.  All Rights Reserved.
#
# Visit http://www.bivio.biz for more info.
# 
# This library is free software; you can redistribute it and/or modify
# it under the terms of the GNU Lesser General Public License as
# published by the Free Software Foundation; either version 2.1 of the
# License, or (at your option) any later version.
# 
# This library is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# Lesser General Public License for more details.
# 
# You should have received a copy of the GNU Lesser General Public
# License along with this library;  If not, you may get a copy from:
# http://www.opensource.org/licenses/lgpl-license.html
# 
# $Id: Error2.bunit,v 1.1 2009/05/06 16:35:21 dobbs Exp $
Request('initialize_fully');
options({
    compute_return => sub {
        return [req('reply')->get('status', 'output')];
    },
    compute_params => sub {
        req()->put(
            task_id => Agent_TaskId('DEFAULT_ERROR_REDIRECT_' . $_[1]->[0]),
        );
        return [req()];
    },
});
req()->with_realm_and_user('site', 'root', sub {
    model('RealmFile')->create_with_content({
        path => "/Public/Wiki/ForbiddenError",
    }, \('@p maybe if you say please'));
    model('RealmFile')->create_with_content({
        path => "/Public/Wiki/NotFoundError",
    }, \('@p think weapons of mass destruction'));
});
[
    class() => [
        execute => [
            FORBIDDEN => [403, qr{say please}i],
            NOT_FOUND => [404, qr{destruction}i],
            MODEL_NOT_FOUND => [404, qr{destruction}i],
        ],
    ],
];