scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

If URL in SHOW-OUTDATED is #f, no reload address is shown.

This commit is contained in:
interp 2002-10-03 13:28:31 +00:00
parent 29abe30461
commit 08eee1915b
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
scheme/httpd/surflets/surflets.scm
View File

@ -223,9 +223,11 @@
`(html (title "Outdated Data")
(body (h1 "Outdated Data")
(p "The page or action you requested relies on outdated data")
(p "Try to "
(URL ,url "reload")
" the page to get current data.")))))
,(if url
`(p "Try to "
(URL ,url "reload")
" the page to get current data.")
'())))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; input-fields