[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 {