%#============================================================================ %# ePortal - WEB Based daily organizer %# Author - S.Rusakov %# %# Copyright (c) 2001 Sergey Rusakov. All rights reserved. %# This program is free software; you can redistribute it %# and/or modify it under the same terms as Perl itself. %# %# $Revision: 3.1 $ %# $Date: 2003/04/24 05:36:52 $ %# $Header: /home/cvsroot/ePortal/comp_root/popup/calendar.htm,v 3.1 2003/04/24 05:36:52 ras Exp $ %# %#---------------------------------------------------------------------------- %# %# Usage: %# %#
%# %# %# ... %#
%# %# or use ePortal::thePersistent::Support::htmlField %# %########################################################################## <%perl> my $C = new ePortal::HTML::Calendar(); $C->url_all( "javascript:SelectDate('$field','%date%');" ); $C->draw; return; %#=== @metags attr ========================================================= <%attr> Title => {rus => "Календарь", eng => "Calendar"} %#=== @metags args ========================================================= <%args> $field => undef