X-Git-Url: https://git.p6c8.net/selfforum.git/blobdiff_plain/bca3eed65c50f585248ae3a1cc8bb6a74e4e8bb8..1783408d3a61b5bd23ee6e3bb637b6d92ac40490:/selfforum-cgi/shared/Template/_conf.pm diff --git a/selfforum-cgi/shared/Template/_conf.pm b/selfforum-cgi/shared/Template/_conf.pm index 626815b..01100a5 100644 --- a/selfforum-cgi/shared/Template/_conf.pm +++ b/selfforum-cgi/shared/Template/_conf.pm @@ -4,7 +4,7 @@ package Template::_conf; # # # File: shared/Template/_conf.pm # # # -# Authors: André Malo , 2001-06-16 # +# Authors: André Malo # # # # Description: combine user and default config # # # @@ -13,14 +13,17 @@ package Template::_conf; use strict; use vars qw( @EXPORT - $VERSION ); ################################################################################ # # Version check # -$VERSION = do { my @r =(q$Revision$ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; +# last modified: +# $Date$ (GMT) +# by $Author$ +# +sub VERSION {(q$Revision$ =~ /([\d.]+)\s*$/)[0] or '0.0'} ################################################################################ # @@ -57,4 +60,4 @@ sub get_view_params ($) { # # -### end of Template::_conf ##################################################### +### end of Template::_conf ##################################################### \ No newline at end of file