[interchange-cvs] interchange - heins modified lib/Vend/Interpolate.pm

interchange-core@icdevgroup.org interchange-core@icdevgroup.org
Fri Oct 11 14:34:01 2002


User:      heins
Date:      2002-10-11 18:33:17 GMT
Modified:  lib/Vend Interpolate.pm
Log:
* Qualify unexported unhexify() routine.

Revision  Changes    Path
2.117     +3 -3      interchange/lib/Vend/Interpolate.pm


rev 2.117, prev_rev 2.116
Index: Interpolate.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /var/cvs/interchange/lib/Vend/Interpolate.pm,v
retrieving revision 2.116
retrieving revision 2.117
diff -u -r2.116 -r2.117
--- Interpolate.pm	5 Oct 2002 05:26:29 -0000	2.116
+++ Interpolate.pm	11 Oct 2002 18:33:17 -0000	2.117
@@ -1,6 +1,6 @@
 # Vend::Interpolate - Interpret Interchange tags
 #=20
-# $Id: Interpolate.pm,v 2.116 2002/10/05 05:26:29 mheins Exp $
+# $Id: Interpolate.pm,v 2.117 2002/10/11 18:33:17 mheins Exp $
 #
 # Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
 #
@@ -27,7 +27,7 @@
 require Exporter;
 @ISA =3D qw(Exporter);
=20
-$VERSION =3D substr(q$Revision: 2.116 $, 10);
+$VERSION =3D substr(q$Revision: 2.117 $, 10);
=20
 @EXPORT =3D qw (
=20
@@ -2995,7 +2995,7 @@
 	$val =3D~ s/\s+$//mg;
 	my @args;
 	if($val =3D~ /^\S+=3D\S+=3D\S*$/) {
-		$val =3D unhexify($val);
+		$val =3D Vend::Util::unhexify($val);
 		@args =3D split $Global::UrlSplittor, $val;
 	}
 	else {