suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixing examples

Browse Source 
svn: r737
This commit is contained in:
Jay McCarthy 2005-09-01 19:46:29 +00:00
parent a4ded2be5e
commit 2b290b3107
4 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/web-server/default-web-root/servlets/examples/compound/helper.ss
View File

@ -1,7 +1,6 @@
(require (lib "xml.ss" "xml") (require (lib "xml.ss" "xml")
(lib "unitsig.ss") (lib "unitsig.ss")
(lib "servlet-sig.ss" "web-server") (lib "servlet-sig.ss" "web-server")
(lib "servlet-helpers.ss" "web-server")
"helper-sig.ss") "helper-sig.ss")
(unit/sig my-servlet-helpers^ (unit/sig my-servlet-helpers^

1
collects/web-server/default-web-root/servlets/examples/compound/multiply.ss
View File

@ -1,5 +1,4 @@
(require (lib "servlet-sig.ss" "web-server") (require (lib "servlet-sig.ss" "web-server")
(lib "servlet-helpers.ss" "web-server")
(lib "unitsig.ss") (lib "unitsig.ss")
(lib "etc.ss") (lib "etc.ss")
"helper-sig.ss") "helper-sig.ss")

3
collects/web-server/default-web-root/servlets/examples/dir.ss
View File

@ -1,6 +1,5 @@
(require (lib "unitsig.ss") (require (lib "unitsig.ss")
(lib "servlet-sig.ss" "web-server") (lib "servlet-sig.ss" "web-server")
(lib "servlet-helpers.ss" "web-server")
(lib "date.ss")) (lib "date.ss"))
(unit/sig () (import servlet^) (unit/sig () (import servlet^)
@ -9,5 +8,5 @@
`(html (head (title "Current Directory Page")) `(html (head (title "Current Directory Page"))
(body (body
(h1 "Current Directory Page") (h1 "Current Directory Page")
(p "The current directory is: " (em ,(current-directory))))))) (p "The current directory is: " (em ,(path->string (current-directory))))))))

1
collects/web-server/default-web-root/servlets/examples/quiz.ss
View File

@ -21,7 +21,6 @@
(require (lib "unitsig.ss") (require (lib "unitsig.ss")
(lib "servlet-sig.ss" "web-server") (lib "servlet-sig.ss" "web-server")
(lib "servlet-helpers.ss" "web-server")
(lib "list.ss") (lib "list.ss")
(lib "etc.ss")) (lib "etc.ss"))