From 170ff9d45744c9a94d26be32709fb3f616ba141a Mon Sep 17 00:00:00 2001 From: Charles Forsyth Date: Wed, 29 Apr 2015 15:09:38 +0100 Subject: convert to use Dial module --- appl/grid/lib/fbrowse.b | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'appl/grid/lib/fbrowse.b') diff --git a/appl/grid/lib/fbrowse.b b/appl/grid/lib/fbrowse.b index bde88e62..d1310386 100644 --- a/appl/grid/lib/fbrowse.b +++ b/appl/grid/lib/fbrowse.b @@ -89,8 +89,6 @@ init(ctxt : ref Draw->Context, title, root, currdir: string): string released := 1; title = ""; - menudata := ("", ""); - tkclient->onscreen(top, nil); resize(top, ctxt.display.image); tkclient->startinput(top, "kbd"::"ptr"::nil); @@ -272,7 +270,6 @@ openfile(ctxt: ref draw->Context, file, title: string, writeable: int) (w,h) := fopensize; if (w != "" && h != "") tkcmd(top, ". configure -width "+w+" -height "+h); - errors := 0; killpid := -1; fd := sys->open(file, sys->OREAD); if (fd != nil) { @@ -369,7 +366,7 @@ actionbutton(top: ref Tk->Toplevel, path, tkpath: string) getext(file: string): string { - (n, lst) := sys->tokenize(file, "."); + (nil, lst) := sys->tokenize(file, "."); for (; tl lst != nil; lst = tl lst) ; return hd lst; -- cgit v1.2.3