# 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: Include3.bunit,v 1.2 2009/12/26 23:07:52 nagler Exp $ Widget({ class_name => class('XHTMLWidget.Wiki'), realm => 'bunit_wiki', user => 'root', view_pre_compile => sub { req()->put(path_info => 'SomePage'); class('Action.WikiView')->execute_prepare_html(req()); return; }, }); req()->set_realm_and_user('bunit_wiki'); model('RealmFile')->delete_all; foreach my $x ( [class('Type.WikiName')->to_absolute('SomePage') => "text after"], [class('Type.WikiDataName')->to_absolute('my.bwiki') => "\@p\ntext before"], ) { model('RealmFile')->create_with_content({path => $x->[0]}, \$x->[1]); } [ [] => qq{

text before\ntext after\n

}, ];