X-Git-Url: https://git.p6c8.net/selfforum.git/blobdiff_plain/5c8a814d80027a517d1094008d6af063457fc6eb..1e5e0364f9fc5f0a3dbac69f9affbb3931115a58:/selfforum-cgi/shared/Template/_thread.pm?ds=sidebyside diff --git a/selfforum-cgi/shared/Template/_thread.pm b/selfforum-cgi/shared/Template/_thread.pm index 5f105a6..f4ee5b2 100644 --- a/selfforum-cgi/shared/Template/_thread.pm +++ b/selfforum-cgi/shared/Template/_thread.pm @@ -4,27 +4,40 @@ package Template::_thread; # # # File: shared/Template/_thread.pm # # # -# Authors: Andre Malo , 2001-04-02 # +# Authors: André Malo # # # # Description: convert parsed thread to HTML # # # ################################################################################ use strict; +use vars qw( + @EXPORT +); use Encode::Plain; $Encode::Plain::utf8 = 1; use Posting::_lib qw(short_hr_time); use Template; use Template::_query; +################################################################################ +# +# Version check +# +# last modified: +# $Date$ (GMT) +# by $Author$ +# +sub VERSION {(q$Revision$ =~ /([\d.]+)\s*$/)[0] or '0.0'} + ################################################################################ # # Export # use base qw(Exporter); -@Template::_thread::EXPORT = qw(html_thread); +@EXPORT = qw(html_thread); -### sub html_thread ($$$) ###################################################### +### html_thread () ############################################################# # # create HTML string # @@ -173,7 +186,7 @@ sub html_thread ($$$) { \$html; } -# keep require happy +# keep 'require' happy 1; #