diff options
Diffstat (limited to 'appl/cmd/ip/virgild.b')
| -rw-r--r-- | appl/cmd/ip/virgild.b | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/appl/cmd/ip/virgild.b b/appl/cmd/ip/virgild.b index 5e44476e..79c3b24b 100644 --- a/appl/cmd/ip/virgild.b +++ b/appl/cmd/ip/virgild.b @@ -5,6 +5,9 @@ sys: Sys; include "draw.m"; +include "dial.m"; +dial: Dial; + include "ip.m"; Virgild: module @@ -19,6 +22,7 @@ Udphdrsize: con IP->Udphdrlen; init(nil: ref Draw->Context, nil: list of string) { sys = load Sys Sys->PATH; + dial = load Dial Dial->PATH; stderr = sys->fildes(2); @@ -66,8 +70,8 @@ init(nil: ref Draw->Context, nil: list of string) openlisten(): ref Sys->FD { - (ok, c) := sys->announce("udp!*!virgil"); - if(ok < 0){ + c := dial->announce("udp!*!virgil"); + if(c == nil){ sys->fprint(stderr, "virgild: can't open port: %r\n"); return nil; } |