[Templates-cvs] cvs commit: Template2/lib/Template Document.pm

[cvs@template-toolkit.org]

cvs         06/01/30 13:34:28

  Modified:    lib/Template Document.pm
  Log:
  * removed use of vStrings for version checking
  
  Revision  Changes    Path
  2.75      +6 -6      Template2/lib/Template/Document.pm
  
  Index: Document.pm
  ===================================================================
  RCS file: /template-toolkit/Template2/lib/Template/Document.pm,v
  retrieving revision 2.74
  retrieving revision 2.75
  diff -u -r2.74 -r2.75
  --- Document.pm	2004/09/17 07:58:36	2.74
  +++ Document.pm	2006/01/30 13:34:28	2.75
  @@ -20,7 +20,7 @@
   # 
   #----------------------------------------------------------------------------
   #
  -# $Id: Document.pm,v 2.74 2004/09/17 07:58:36 abw Exp $
  +# $Id: Document.pm,v 2.75 2006/01/30 13:34:28 abw Exp $
   #
   #============================================================================
   
  @@ -33,16 +33,16 @@
   use base qw( Template::Base );
   use Template::Constants;
   
  -$VERSION = sprintf("%d.%02d", q$Revision: 2.74 $ =~ /(\d+)\.(\d+)/);
  +$VERSION = sprintf("%d.%02d", q$Revision: 2.75 $ =~ /(\d+)\.(\d+)/);
   
   BEGIN {
       # UNICODE is supported in versions of Perl from 5.008 onwards
       if ($UNICODE = $] > 5.007 ? 1 : 0) {
  -        if ($^V gt v5.8.0) {
  +        if ($] > 5.008) {
               # utf8::is_utf8() available from Perl 5.8.1 onwards
               *is_utf8 = \&utf8::is_utf8;
           }
  -        elsif ($^V eq v5.8.0) {
  +        elsif ($] == 5.008) {
               # use Encode::is_utf8() for Perl 5.8.0
               require Encode;
               *is_utf8 = \&Encode::is_utf8;
  @@ -487,8 +487,8 @@
   
   =head1 VERSION
   
  -2.71, distributed as part of the
  -Template Toolkit version 2.13, released on 30 January 2004.
  +2.74, distributed as part of the
  +Template Toolkit version 2.15, released on 27 January 2006.
   
   =head1 COPYRIGHT