[interchange-cvs] interchange - heins modified code/SystemTag/process.coretag
interchange-core@icdevgroup.org
interchange-core@icdevgroup.org
Thu Aug 1 23:27:00 2002
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};
}