summaryrefslogtreecommitdiff
path: root/appl/cmd/dial.b
diff options
context:
space:
mode:
Diffstat (limited to 'appl/cmd/dial.b')
-rw-r--r--appl/cmd/dial.b12
1 files changed, 8 insertions, 4 deletions
diff --git a/appl/cmd/dial.b b/appl/cmd/dial.b
index c562a570..8821b49a 100644
--- a/appl/cmd/dial.b
+++ b/appl/cmd/dial.b
@@ -1,4 +1,4 @@
-implement Dial;
+implement Dialcmd;
include "sys.m";
sys: Sys;
include "draw.m";
@@ -7,11 +7,12 @@ include "keyring.m";
keyring: Keyring;
include "security.m";
auth: Auth;
+include "dial.m";
include "sh.m";
sh: Sh;
Context: import sh;
-Dial: module {
+Dialcmd: module {
init: fn(nil: ref Draw->Context, argv: list of string);
};
@@ -35,6 +36,9 @@ init(drawctxt: ref Draw->Context, argv: list of string)
arg := load Arg Arg->PATH;
if (arg == nil)
badmodule(Arg->PATH);
+ dial := load Dial Dial->PATH;
+ if(dial == nil)
+ badmodule(Dial->PATH);
sh = load Sh Sh->PATH;
if (sh == nil)
badmodule(Sh->PATH);
@@ -87,8 +91,8 @@ init(drawctxt: ref Draw->Context, argv: list of string)
}
}
- (ok, c) := sys->dial(addr, nil);
- if (ok == -1) {
+ c := dial->dial(addr, nil);
+ if (c == nil) {
sys->fprint(stderr(), "dial: cannot dial %s:: %r\n", addr);
raise "fail:errors";
}