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

register session before loading plugin to be able to create callbacks in plugin

This commit is contained in:
interp 2002-09-27 15:04:36 +00:00
parent e667dedcc2
commit 3fcaa99239
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -75,6 +75,7 @@
(make-lock) ; continuation table lock (make-lock) ; continuation table lock
(make-thread-safe-counter))) ; continuation counter (make-thread-safe-counter))) ; continuation counter
(release-lock *instance-table-lock*) (release-lock *instance-table-lock*)
(register-session! instance-id 'no-return)
(let ((plugin (with-fatal-error-handler* (let ((plugin (with-fatal-error-handler*
(lambda (condition decline) (lambda (condition decline)
(instance-delete! instance-id) (instance-delete! instance-id)
@ -83,7 +84,6 @@
(get-plugin-rt-structure path-string servlet-path))))) (get-plugin-rt-structure path-string servlet-path)))))
(reset (reset
(begin (begin
(register-session! instance-id 'no-return)
(with-cwd (with-cwd
servlet-path servlet-path
(with-names-from-rt-structure (with-names-from-rt-structure