<br>
<br><font size=2><tt>seaside-bounces@lists.squeakfoundation.org wrote on
22.09.2004 10:52:14:<br>
<br>
&gt; Hi Lukas,<br>
&gt; <br>
&gt; &gt; I'm new to Seaside and currently building a web-interface to
a <br>
&gt; &gt; existing database application. Therefore I want the user to be
able to <br>
&gt; &gt; set the 'timeout' or 'expiry seconds'. how can I do that dynamically?<br>
&gt; <br>
&gt; create a customized subclass of WASession and override the message
<br>
&gt; #defaultTimeoutSeconds to return an i-var:<br>
&gt; <br>
&gt; &nbsp; &nbsp;MySession&gt;&gt;defaultTimeoutSeconds<br>
&gt; &nbsp; &nbsp; &nbsp; ^self timeoutSeconds<br>
&gt; <br>
&gt; Add an i-var 'timeoutSeconds' and write some accessor-methods:<br>
&gt; <br>
&gt; &nbsp; &nbsp;MySession&gt;&gt;timeoutSeconds<br>
&gt; &nbsp; &nbsp; &nbsp; ^timeoutSeconds<br>
&gt; <br>
&gt; &nbsp; &nbsp;MySession&gt;&gt;timeoutSeconds: anInteger<br>
&gt; &nbsp; &nbsp; &nbsp; timeoutSeconds := anInteger<br>
&gt; <br>
&gt; Now you are able to set the timeout on a per-session bases from any
<br>
&gt; component:<br>
&gt; <br>
&gt; &nbsp; &nbsp;MyComponent&gt;&gt;foo<br>
&gt; &nbsp; &nbsp; &nbsp; ...<br>
&gt; &nbsp; &nbsp; &nbsp; self session timeoutSeconds: 1234.<br>
&gt; &nbsp; &nbsp; &nbsp; ...<br>
&gt; <br>
&gt; Hope this helps,<br>
&gt; Lukas<br>
<br>
</tt></font>
<br><font size=2><tt>Hi Lukas</tt></font>
<br>
<br><font size=2><tt>Yes this helps. Thank you.</tt></font>
<br>
<br><font size=2><tt>Cheers,</tt></font>
<br><font size=2><tt>Lukas Hollenstein</tt></font>
<br>
<br>
<table><tr><td bgcolor=#ffffff><font color=#000000>This message is for information purposes only. It may not be secure or<br>error-free. The Swiss National Bank does not accept legal responsibility for<br>any consequences resulting from e-mail use.<br></font></td></tr></table>