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

interchange-core@icdevgroup.org interchange-core@icdevgroup.org
Sun Aug 25 20:59:00 2002


User:      heins
Date:      2002-08-26 00:58:27 GMT
Modified:  lib/Vend Interpolate.pm
Log:
* Return arg=3D"parm" parameter to operation....

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


rev 2.107, prev_rev 2.106
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.106
retrieving revision 2.107
diff -u -r2.106 -r2.107
--- Interpolate.pm	18 Aug 2002 07:59:08 -0000	2.106
+++ Interpolate.pm	26 Aug 2002 00:58:26 -0000	2.107
@@ -1,6 +1,6 @@
 # Vend::Interpolate - Interpret Interchange tags
 #=20
-# $Id: Interpolate.pm,v 2.106 2002/08/18 07:59:08 mheins Exp $
+# $Id: Interpolate.pm,v 2.107 2002/08/26 00:58:26 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.106 $, 10);
+$VERSION =3D substr(q$Revision: 2.107 $, 10);
=20
 @EXPORT =3D qw (
=20
@@ -3107,7 +3107,7 @@
 		undef $arg;
 	}
=20
-	resolve_static(), $url =3D $urlroutine->($page)
+	resolve_static(), $url =3D $urlroutine->($page, $arg)
 		unless $url;
=20
     return qq{<a href=3D"$url"$extra>};