From 9b29ac7ea714507a9c0690620c02c8ca5ab25f90 Mon Sep 17 00:00:00 2001 From: "Charles.Forsyth" Date: Tue, 22 Jan 2008 21:54:45 +0000 Subject: 20080122-2200 --- appl/lib/convcs/convcs.b | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'appl/lib/convcs/convcs.b') diff --git a/appl/lib/convcs/convcs.b b/appl/lib/convcs/convcs.b index 23208224..8e3b31f3 100644 --- a/appl/lib/convcs/convcs.b +++ b/appl/lib/convcs/convcs.b @@ -142,7 +142,7 @@ aliases(cs : string) : (string, list of string) recs := cfg->lookup(name); if (recs == nil) continue; # shouldn't happen! - (val, rec) := hd recs; + (val, nil) := hd recs; if (val != cs) continue; al = name :: al; -- cgit v1.2.3