[interchange-cvs] interchange - heins modified code/SystemTag/process.coretag

[interchange-core@icdevgroup.org]

User:      heins
Date:      2002-08-02 03:26:52 GMT
Modified:  code/SystemTag process.coretag
Log:
* Add ability to specify some URL besides "process".

Revision  Changes    Path
1.3       +2 -1      interchange/code/SystemTag/process.coretag


rev 1.3, prev_rev 1.2
Index: process.coretag
=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: /anon_cvs/repository/interchange/code/SystemTag/process.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- process.coretag	18 Feb 2002 01:00:21 -0000	1.2
+++ process.coretag	2 Aug 2002 03:26:52 -0000	1.3
@@ -7,7 +7,8 @@
=20
 	$secure =3D defined $secure ? $secure : $CGI::secure;
=20
-	my $url =3D $secure ? secure_vendUrl('process') : vendUrl('process');
+	my $page =3D $opt->{href} || 'process';
+	my $url =3D $secure ? secure_vendUrl($page) : vendUrl($page);
 	return $url unless $target;
 	return qq{$url" TARGET=3D"$target};
 }