Login | Register For Free | Help
Search for: (Advanced)

Mailing List Archive: ModPerl: Embperl-cvs

cvs commit: embperl/eg/web/db add.epl addsel.epl

 

 

ModPerl embperl-cvs RSS feed   Index | Next | Previous | View Threaded


richter at apache

Jan 15, 2003, 10:29 PM

Post #1 of 1 (204 views)
Permalink
cvs commit: embperl/eg/web/db add.epl addsel.epl

richter 2003/01/15 21:29:15

Modified: eg/web/db add.epl addsel.epl
Log:
website updates

Revision Changes Path
1.5 +4 -2 embperl/eg/web/db/add.epl

Index: add.epl
===================================================================
RCS file: /home/cvs/embperl/eg/web/db/add.epl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- add.epl 9 Jan 2003 05:59:02 -0000 1.4
+++ add.epl 16 Jan 2003 05:29:15 -0000 1.5
@@ -17,7 +17,7 @@

[$ if !$r->{error} $]

-<form action="[.+ $r -> {action_prefix}?($r->{action_prefix} . dirname($r-> param -> uri) .'/'):'' +]show.epl" method="POST">
+<form action="[.+ $r -> app -> languri($r, $r -> {action_prefix}?($r->{action_prefix} . dirname($r-> param -> uri) .'/'):'', $r -> param -> language) +]show.epl" method="POST">

[= add2a =]<br>
[= add2b =]<br><br>
@@ -61,7 +61,9 @@
[# <td class="cText" valign="top" colspan="2">[+ $txt +] / [+ $type +] / [+ $i++ +]</td> #]
[$ if $cy->{$type} =~ /textarea/ $]
<td class="cText" valign="top">[+ $txt +]:&nbsp;</td>
- <td class="cInput"><textarea name="[+ $type +]_[+ $rec -> {id} +]" cols="60" rows="10"></textarea> </td>
+ <td class="cInput">
+ <textarea name="[+ $type +]_[+ $rec -> {id} +]" cols="60" rows="10">[+ $fdat{"${type}_$rec->{id}"} +]</textarea>
+ </td>
[$ elsif $cy->{$type} =~ /pulldown/ $]
<td class="cText" valign="top">[+ $txt +]:&nbsp;</td>
<td class="cInput">



1.4 +1 -1 embperl/eg/web/db/addsel.epl

Index: addsel.epl
===================================================================
RCS file: /home/cvs/embperl/eg/web/db/addsel.epl,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- addsel.epl 20 Nov 2002 06:56:27 -0000 1.3
+++ addsel.epl 16 Jan 2003 05:29:15 -0000 1.4
@@ -74,7 +74,7 @@
#]

[.#
-<form action="[+ $r -> {action_prefix}?($r->{action_prefix} . dirname($r-> param -> uri) .'/'):''+]addsel.epl" OnSubmit="">
+<form action="[.+ $r -> app -> languri($r, $r -> {action_prefix}?($r->{action_prefix} . dirname($r-> param -> uri) .'/'):'', $r -> param -> language) +]addsel.epl" OnSubmit="">

[= addsel2 =]<br>
[= addsel3 =]<br><br>




---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe [at] perl
For additional commands, e-mail: embperl-cvs-help [at] perl

ModPerl embperl-cvs RSS feed   Index | Next | Previous | View Threaded
 
 


Interested in having your list archived? Contact Gossamer Threads
 
  Web Applications & Managed Hosting Powered by Gossamer Threads Inc.