diff --git a/sys/vane/jael.hoon b/sys/vane/jael.hoon index 2ae746845..ce0e3e992 100644 --- a/sys/vane/jael.hoon +++ b/sys/vane/jael.hoon @@ -737,7 +737,7 @@ ^- (list move) :~ [hen %pass /(scot %p our)/init %b %wait +(now.sys)] [hen %give %init our] - [hen %slip %e %init our] + [hen %slip %l %init our] [hen %slip %d %init our] [hen %slip %g %init our] [hen %slip %c %init our] @@ -787,7 +787,7 @@ %+ weld moz ^- (list move) :~ [hen %give %init our] - [hen %slip %e %init our] + [hen %slip %l %init our] [hen %slip %d %init our] [hen %slip %g %init our] [hen %slip %c %init our] diff --git a/sys/vane/light.hoon b/sys/vane/light.hoon index 7d2a13c70..2213cf72b 100644 --- a/sys/vane/light.hoon +++ b/sys/vane/light.hoon @@ -163,6 +163,9 @@ :: internal authentication page :: [%login-handler ~] + :: gall subscription system + :: + [%subscriptions ~] == :: +authentication-state: state used in the login system :: @@ -406,6 +409,9 @@ :: %login-handler (handle-request:authentication secure address http-request) + :: + %subscriptions + [~ state] == :: +cancel-request: handles a request being externally aborted :: @@ -446,6 +452,11 @@ :: %login-handler [~ state] + :: + %subscriptions + :: todo: this part actually matters. + :: + [~ state] == :: +return-static-data-on-duct: returns one piece of data all at once :: @@ -837,12 +848,14 @@ :: %init: tells us what our ship name is :: %init + ~& %light-born :: =. ship.ax [~ our.task] :: initial value for the login handler :: =. bindings.server-state.ax :~ [[~ /~/login] duct [%login-handler ~]] + [[~ /~/subscription] duct [%subscription ~]] == [~ light-gate] :: %born: new unix process