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

make forms POSTing

This commit is contained in:
interp 2002-10-09 15:14:54 +00:00
parent db331ad0e3
commit 044c27e292
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
scheme/httpd/surflets/web-server/root/surflets/admin-profiling.scm
View File

@ -59,6 +59,7 @@
(br) (br)
(servlet-form (servlet-form
,new-url ,new-url
POST
(p "This uses " (var "gnuplot") " that is searched at " (p "This uses " (var "gnuplot") " that is searched at "
,input-field ,change-button))) ,input-field ,change-button)))
(li (URL ,(reset-address new-url) (li (URL ,(reset-address new-url)

1
scheme/httpd/surflets/web-server/root/surflets/admin-servlets.scm
View File

@ -39,6 +39,7 @@
,header ,header
(servlet-form (servlet-form
,new-url ,new-url
POST
(table (table
,@(cons '(th) header-row) ,@(cons '(th) header-row)
,@(map (lambda (checkbox table-element) ,@(map (lambda (checkbox table-element)