# Copyright (c) 2005-2010 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: Acknowledgement.pm,v 1.5 2010/02/17 01:55:42 nagler Exp $ package Bivio::UI::XHTML::Widget::Acknowledgement; use strict; use Bivio::Base 'XHTMLWidget.Tag'; use Bivio::UI::ViewLanguageAUTOLOAD; our($VERSION) = sprintf('%d.%02d', q$Revision: 1.5 $ =~ /\d+/g); my($_A) = __PACKAGE__->use('Action.Acknowledgement'); my($_T) = __PACKAGE__->use('FacadeComponent.Text'); sub new { return shift->SUPER::new(@_)->put_unless_exists( tag => 'div', class => 'acknowledgement', tag_if_empty => 0, value => DIV_text(Prose( [sub { my($req) = shift->req; return '' unless my $label = $_A->extract_and_delete_label($req); return vs_text($req, 'acknowledgement', $label); }], )), ); } 1;