#
################################################################################
#
-# $Revision: 57 $
+# $Revision: 59 $
# $Author: mhx $
-# $Date: 2007/09/11 23:28:24 +0200 $
+# $Date: 2008/01/04 10:47:38 +0100 $
#
################################################################################
#
-# Version 3.x, Copyright (C) 2004-2007, Marcus Holland-Moritz.
+# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz.
# Version 2.x, Copyright (C) 2001, Paul Marquess.
# Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
#
#
################################################################################
#
-# $Revision: 57 $
+# $Revision: 59 $
# $Author: mhx $
-# $Date: 2007/09/11 23:28:24 +0200 $
+# $Date: 2008/01/04 10:47:38 +0100 $
#
################################################################################
#
-# Version 3.x, Copyright (C) 2004-2007, Marcus Holland-Moritz.
+# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz.
# Version 2.x, Copyright (C) 2001, Paul Marquess.
# Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
#
=head1 COPYRIGHT
-Version 3.x, Copyright (C) 2004-2007, Marcus Holland-Moritz.
+Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz.
Version 2.x, Copyright (C) 2001, Paul Marquess.
use strict;
use vars qw($VERSION $data);
-$VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.13 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
+$VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.14 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
sub _init_data
{
%include SvREFCNT
+%include newSVpv
+
%include SvPV
%include Sv_set