--- frx/frx_req.mli.orig	Fri Aug 28 19:55:13 1998
+++ frx/frx_req.mli	Fri Aug 28 19:55:41 1998
@@ -15,7 +15,7 @@
     or false if the user clicks Cancel.
   *)
 val open_list :
-  string -> string list -> (string -> 'a) -> (unit -> 'b) -> unit
+  string -> string list -> (string -> unit) -> (unit -> 'a) -> unit
  (* [open_list title elements action cancelled]
     A dialog for selecting from a list of elements. [action] is called
     on each selected element, or [cancelled] is called if the user clicks
