%doc>
#
# $Id: test-pdf.html,v 1.2 2002/01/22 13:49:06 adulau Exp $
#
# Test page for calling the html2pdf component and to test your
# pdf install librairies.
#
# Author : Alexandre Dulaunoy
# Copyright (C) 2001 Alexandre Dulaunoy
# Copyright (C) 2001 Conostix S.A. Luxembourg
# 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. See .
#
# 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.
#
%doc>
<%args>
$session
%args>
<%perl>
my $data = $m->scomp('./events.html',web_agent_id=>2,web_like=>'x',session=>$session);
my $r = Apache->request;
$r->content_type('application/pdf');
$r->send_http_header;
$r->status(200);
my $realoutput = $m->comp('../internal/html2pdf.ipfc',data=>$data);
%perl>