Correct self links.
This commit is contained in:
parent
ef3a8af150
commit
9a6b262637
|
@ -47,7 +47,7 @@
|
||||||
(body (h2 "Result")
|
(body (h2 "Result")
|
||||||
(p ,(number->string (+ (get-number1) (get-number2))))
|
(p ,(number->string (+ (get-number1) (get-number2))))
|
||||||
(hr)
|
(hr)
|
||||||
(a (@ (href "add.scm")) "New calculation (new session)")(br)
|
(a (@ (href "add-html.scm")) "New calculation (new session)")(br)
|
||||||
(a (@ (href "javascript:history.go(-2)")) "New calculation (same session)")(br)
|
(a (@ (href "javascript:history.go(-2)")) "New calculation (same session)")(br)
|
||||||
(a (@ (href ,new-url)) "Close this session")))))))
|
(a (@ (href ,new-url)) "Close this session")))))))
|
||||||
;; How to clear session data and go to another HTML page:
|
;; How to clear session data and go to another HTML page:
|
||||||
|
|
Loading…
Reference in New Issue