19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
-
+
-
-
+
-
|
(s:get-param 'param1) => "value1"
(s:get-param 'param1 'number) => number or #f
Create a link.
~~~~~~~~~~~~~~
(s:null "[" (s:a name 'href
(s:a name 'href
(s:link-to (string-append "location/" (string-intersperse p "/") ""))) "] ")))
(s:link-to "pagename/blah" ""))
Call current page with new param
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
In view.scm:
(s:center "[" (s:a 'href (s:link-to "polls"
|