From: Jarkko Hietaniemi Date: Mon, 15 Oct 2001 16:44:04 +0000 (+0000) Subject: Bump the version number to agree with the maintperl one. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8b2fd6ccdf1e6b6a200ccf52e765ef024ccf017b;p=p5sagit%2Fp5-mst-13.2.git Bump the version number to agree with the maintperl one. p4raw-id: //depot/perl@12445 --- diff --git a/lib/Tie/RefHash.pm b/lib/Tie/RefHash.pm index 8555635..ef7d2b7 100644 --- a/lib/Tie/RefHash.pm +++ b/lib/Tie/RefHash.pm @@ -1,6 +1,6 @@ package Tie::RefHash; -our $VERSION = '1.21'; +our $VERSION = '1.3_00'; =head1 NAME @@ -21,7 +21,7 @@ This module provides the ability to use references as hash keys if you first C the hash variable to this module. Normally, only the keys of the tied hash itself are preserved as references; to use references as keys in hashes-of-hashes, use Tie::RefHash::Nestable, -included as part of Tie::Hash. +included as part of Tie::RefHash. It is implemented using the standard perl TIEHASH interface. Please see the C entry in perlfunc(1) and perltie(1) for more information. @@ -59,7 +59,7 @@ Gurusamy Sarathy gsar@activestate.com =head1 VERSION -Version 1.21 22 Jun 1999 +Version 1.3 =head1 SEE ALSO @@ -67,8 +67,8 @@ perl(1), perlfunc(1), perltie(1) =cut -require 5.003_11; use Tie::Hash; +use vars '@ISA'; @ISA = qw(Tie::Hash); use strict; @@ -148,7 +148,8 @@ sub CLEAR { } package Tie::RefHash::Nestable; -use vars '@ISA'; @ISA = qw(Tie::RefHash); +use vars '@ISA'; +@ISA = 'Tie::RefHash'; sub STORE { my($s, $k, $v) = @_;