DADA::Template::HTML
Module for generating HTML templates for lists and administration
use DADA::Template::HTML; #print out a admin header template: print admin_template_header(-Title => "hola! I am a list header", -List => $list, ); # now, print the admin footer template: print admin_template_footer(-List => $list); # give me the default Dada Mail list template my $default_template = default_template($DADA::Config::PROGRAM_URL); # do I have a template? my $template_exists = check_if_template_exists(-List => $list); print "my template exists!!" if $template_exists >= 1; # what lists do have templates? my @list_templates = available_templates(); # open up my template my $list_template = open_template(-List => $list); # print a list template header print list_template(-List => $list, -Part => 'header', ); # print the list template footer print list_template(-List => $list, -Part => 'footer', -Site_Name => "justin's site", -Site_URL => "http://skazat.com", );
# the 'send this archived message to a friend" link maker # print archive_send_link($list, $message_id);
Copyright (c) 1999-2008 Justin Simoni http://justinsimoni.com All rights reserved.
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.
This program 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 General Public License for more details.
You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.