浏览代码

do not hide actual type in import completion because there's a semantic difference (see #2263)

Simon Krajewski 10 年之前
父节点
当前提交
3740836d0a
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      main.ml

+ 1 - 1
main.ml

@@ -1713,7 +1713,7 @@ with
 							statics := Some c.cl_ordered_statics
 						| _ -> ()
 					end;
-					snd tinfos.mt_path <> s_module && not tinfos.mt_private
+					not tinfos.mt_private
 				) m.m_types in
 				let types = if c <> s_module then [] else List.map (fun t -> snd (t_path t),"",Some Typer.FKType,"") public_types in
 				let ctx = print_context() in