diff --git a/scheme/httpd/surflets/surflet-handler.scm b/scheme/httpd/surflets/surflet-handler.scm index 90ddac3..19631ff 100644 --- a/scheme/httpd/surflets/surflet-handler.scm +++ b/scheme/httpd/surflets/surflet-handler.scm @@ -543,7 +543,7 @@ ;; All arguments are numbers except PATH-STRING, which is a string. (define (make-resume-url path-string session-id continuation-counter continuation-id) - (string-append path-string + (string-append (file-name-nondirectory path-string) ";k" (number->string session-id) ";c" (number->string continuation-counter) "-" (number->string continuation-id))) @@ -641,7 +641,7 @@
  • You URL is illformed.
  • -

    In any case, you may try to restart the SUrflet from the beginning. Your browser may also have cached an old session of this SUrflet. In this case, try to reload the page.

    " start-url)) +

    In any case, you may try to restart the SUrflet from the beginning. Your browser may also have cached an old session of this SUrflet. In this case, try to reload the page.

    " (file-name-nondirectory start-url))) ;; Constructor with defaults. (define (make-default-surflet-options)