richter 2003/01/08 22:19:32
Modified: eg/web/db login.epl loginform.epl
Log:
website updates
Revision Changes Path
1.4 +1 -0 embperl/eg/web/db/login.epl
Index: login.epl
===================================================================
RCS file: /home/cvs/embperl/eg/web/db/login.epl,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- login.epl 9 Jan 2003 05:59:02 -0000 1.3
+++ login.epl 9 Jan 2003 06:19:32 -0000 1.4
@@ -1,4 +1,5 @@
[! use File::Basename ; !]
+[- $r = shift ; -]
<div align="center">
<p class="cHeadline">[= login_head =]</p>
1.5 +1 -1 embperl/eg/web/db/loginform.epl
Index: loginform.epl
===================================================================
RCS file: /home/cvs/embperl/eg/web/db/loginform.epl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- loginform.epl 9 Jan 2003 05:59:02 -0000 1.4
+++ loginform.epl 9 Jan 2003 06:19:32 -0000 1.5
@@ -55,7 +55,7 @@
<P ALIGN="left">[= login3 =]</P>
- <form action="$r -> {action_prefix}?($r->{action_prefix} . dirname($r-> param
-> uri) .'/'):''+]login.epl" method="POST" name="newuser" onSubmit="return
epform_validate_newuser()">
+ <form action="[+ $r -> {action_prefix}?($r->{action_prefix} . dirname($r->
param -> uri) .'/'):''+]login.epl" method="POST" name="newuser" onSubmit="return
epform_validate_newuser()">
<table>
<tr>
<td class="cText">[= user_email =]</td>
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
