diff options
Diffstat (limited to 'dis/demo/chat/chatclient')
| -rwxr-xr-x | dis/demo/chat/chatclient | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/dis/demo/chat/chatclient b/dis/demo/chat/chatclient new file mode 100755 index 00000000..11ebf15b --- /dev/null +++ b/dis/demo/chat/chatclient @@ -0,0 +1,20 @@ +#!/dis/sh +load std +autoload=std +ndb/cs + +chatroom=$1 + +fn ck { + or {$*} { + echo chatclient: exiting >[1=2] + raise error + } +} +user="{cat /dev/user} + +ck mount -A 'tcp!$registry!registry' /mnt/registry +ck /dis/grid/remotelogon wm/wm { + k = /usr/$user/keyring/default + grid/find -a resource chat -a pk `{getpk -s $k} Enter {demo/chat/chat /n/client} Shell {wm/sh} +} |
