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

`cat ~/diff-sunet/$num/log`

This commit is contained in:
interp 2003-08-01 17:41:06 +00:00
parent d134f033d6
commit 92dc531fa2
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
scheme/httpd/surflets/surflet-handler.scm
View File

@ -169,8 +169,7 @@
(lambda (path-string surflet-path s-req) (lambda (path-string surflet-path s-req)
(receive (session-id continuation-id) (receive (session-id continuation-id)
;; Searches ids only in file-name. (resume-url-ids path-string)
(resume-url-ids (file-name-nondirectory path-string))
;; Try to get continuation-table and then the continuation. ;; Try to get continuation-table and then the continuation.
(let ((session (session-lookup session-id))) (let ((session (session-lookup session-id)))
(if session (if session