setup webserver
parent
5071293750
commit
c780502a8c
|
@ -39,15 +39,6 @@ TUPLE: bbb < dispatcher ;
|
|||
<slack-event-action> "slack-events" add-responder
|
||||
<theme-action> "subdomain" add-responder ;
|
||||
|
||||
SYMBOL: current-bbb-server
|
||||
: run-bbb-server ( -- )
|
||||
<bbb> main-responder set-global
|
||||
8080 httpd current-bbb-server set ;
|
||||
|
||||
: restart-bbb-server ( -- )
|
||||
current-bbb-server get stop-server
|
||||
run-bbb-server ;
|
||||
|
||||
: add-default-slack-listeners ( -- )
|
||||
{
|
||||
[ check-mississippi-request ]
|
||||
|
@ -55,8 +46,16 @@ SYMBOL: current-bbb-server
|
|||
[ check-links ]
|
||||
} slack-callbacks set-global ;
|
||||
|
||||
: start-bonerbonerboner ( -- )
|
||||
add-default-slack-listeners
|
||||
run-bbb-server ;
|
||||
SYMBOL: current-bbb-server
|
||||
|
||||
MAIN: start-bonerbonerboner
|
||||
: <bbb-website-server> ( -- threaded-server )
|
||||
<http-server>
|
||||
f >>secure
|
||||
8069 >>insecure ;
|
||||
|
||||
: start-bbb-site ( -- )
|
||||
add-default-slack-listeners
|
||||
<bbb> main-responder set-global
|
||||
<bbb-website-server> start-server wait-for-server ;
|
||||
|
||||
MAIN: start-bbb-site
|
||||
|
|
Loading…
Reference in New Issue