On Sun, May 19, 2013 at 06:45:33PM +0200, Alexander Burger wrote:
> On Sun, May 19, 2013 at 06:27:21PM +0200, Alexander Burger wrote:
> > Work perfectly! Congratulations! :)
>
> However, the time is strange. It says
>
> It's now 12:44:27 (around here)
>
> Is the server not in Norway? I'd expect 19:44:27 then.
Taking a closer look, it seems in Canada, right?
BTW, if I'd want to make a form with a time-field, which updates its
value whenever you press a button:
(allowed ()
"!home" setTime "@lib.css" )
(load "@lib/http.l" "@lib/xhtml.l" "@lib/form.l")
(de setTime (H M S)
(set> (: time) (time H M S)) )
(de home ()
(app)
(action
(html 0 "Local Time" "@lib.css" NIL
(form NIL
(gui 'time '(+Lock +TimeField) 10 "Local Time")
(----)
(gui '(+OnClick +Button)
"var t = new Date();
return lisp(this.form, 'setTime',
t.getHours(),
t.getMinutes(),
t.getSeconds())"
"Now!" ) ) ) ) )
(de go ()
(server 8080 "!home") )
Started as
pil <file>.l -go + # Debug
pil <file>.l -go -wait # Production
♪♫ Alex
--
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe
