The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

lib/mktemp-forms.pl - return miscellaneous template editor HTML forms.

SYNOPSIS

  require "$ROADS::Lib/mktemp-forms.pl";
  &SendIntroForm;
  &sendsizeform;  

DESCRIPTION

This package implements routines for sending back miscellaneous HTML forms to the end user.

METHODS

SendIntroForm;

This function returns the form introform in the program call mktemp.

sendsizeform;

This function returns a form which is generated partly from the customisable HTML in the mktemp messages collection, with additional HTML dynamically generated if necessary. If the template being edited already exists, and it is possible to add additional clusters and/or variant elements, the HTML form returned will include fields asking the user to choose how many (if any) additional clusters of each type and/or variants they would like to add.

If the template is being created, the user will be prompted (if applicable) for the number of clusters of each type and variants they would like to include in it.

FILES

config/multilingual/*/mktemp/introform.html - introductory form.

config/multilingual/*/mktemp/notemplateoutline.html - returned when no outline (schema) definition could be found for the template type being edited could be found.

config/multilingual/*/mktemp/clusterhead.html - the beginning of the HTML document created when the template being edited contains clusters.

config/multilingual/*/mktemp/variantsizeonly.html - HTML returned when the template being edited contains variants but not clusters.

config/multilingual/*/mktemp/clustervariantsize.html - HTML returned when the template being edited contains both clusters and variants.

config/multilingual/*/mktemp/clusteronlybottom.html - HTML returned when the template being edited contains clusters but not variants.

config/outlines/* - outline (schema) definitions of the available templates.

SEE ALSO

"mktemp.pl" in admin-cgi

COPYRIGHT

Copyright (c) 1988, Martin Hamilton <martinh@gnu.org> and Jon Knight <jon@net.lut.ac.uk>. All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

It was developed by the Department of Computer Studies at Loughborough University of Technology, as part of the ROADS project. ROADS is funded under the UK Electronic Libraries Programme (eLib), the European Commission Telematics for Research Programme, and the TERENA development programme.

AUTHOR

Jon Knight <jon@net.lut.ac.uk>