blob: 0782b7da7955f640dfbe789eaa25daa913359d1d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
/- sur=nostril
/+ lib=nostril, sr=sortug
/+ server
:: pages and components
/= layout /web/layout
/= navbar /web/components/navbar
/= index /web/pages/index
:: assets
/* css %css /web/assets/style/css
/* spinner %noun /web/assets/spinner/svg
/* favicon %noun /web/assets/favicon/ico
/* favicon1 %noun /web/assets/favicon-32x32/png
/* favicon2 %noun /web/assets/favicon-16x16/png
::
|%
+$ order [id=@ta req=inbound-request:eyre]
++ json-body json-to-octs:server
++ ebail |= id=@t %- give-simple-payload:app:server [id pbail]
++ pbail
%- html-response:gen:server
%- manx-to-octs:server
manx-bail
++ manx-bail ^- manx ;div:"404"
++ manx-payload
|= =manx
^- simple-payload:http
%- html-response:gen:server
%- manx-to-octs:server manx
:: main
++ router
|_ [=state:sur =bowl:gall]
++ rout
|= =order
^- (list card:agent:gall)
=/ rl (parse-request-line:server url.request.req.order)
=. site.rl ?~ site.rl ~ t.site.rl
=/ met method.request.req.order
=/ fpath=(pole knot) [met site.rl]
|^
~
--
--
--
|
