fixed hook export problem

svn: r8960
This commit is contained in:
John Clements 2008-03-12 19:20:44 +00:00
parent 6326734300
commit 0a51641563

View File

@ -11,9 +11,10 @@
!defined !procedure !procedure* !integer !integer* !defined !procedure !procedure* !integer !integer*
check: check:
!test !all-covered) !test !all-covered)
handin-server/scribblings/hook-dummy
mred)) mred))
@(require (for-label handin-server/scribblings/hook-dummy))
@(define (comment . args) "") @(define (comment . args) "")
@comment{Is there an existing mechanism for comments?} @comment{Is there an existing mechanism for comments?}
@ -182,9 +183,14 @@ uniquely. For example, @filepath{uu-cpsc2010} is a good name for CPSC
} }
@section{Bogus Section}
@section[#:tag "server-setup"]{Server Setup} @section[#:tag "server-setup"]{Server Setup}
@declare-exporting[#:use-sources (handin-server/scribblings/hook-dummy)]
You must prepare a special directory to host the handin server. To You must prepare a special directory to host the handin server. To
run the server, you should either be in this directory, or you should run the server, you should either be in this directory, or you should
set the @envvar{PLT_HANDINSERVER_DIR} environment variable. set the @envvar{PLT_HANDINSERVER_DIR} environment variable.
@ -350,8 +356,6 @@ This directory contains the following files and sub-directories:
to contain a module that provides a @scheme[hook] function, which to contain a module that provides a @scheme[hook] function, which
should be receiving three arguments: should be receiving three arguments:
@declare-exporting[#:use-sources (handin-server/scribblings/hook-dummy)]
@defproc[(hook [operation symbol?] @defproc[(hook [operation symbol?]
[connection-context (or/c number? symbol? false?)] [connection-context (or/c number? symbol? false?)]
[relevant-info (listof (list/c symbol? any))]) [relevant-info (listof (list/c symbol? any))])