X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2FgTopLevel.ml;h=2b9e101ab43a11e20db3f22351b57ebf61f317fd;hb=8b8606be3b086e20ead16ca7417da5f1c4e02e79;hp=e0e0bfca3385ec92996bd07da6ad0a4c4b8be674;hpb=cf7fbeee5c21b86f70281f42cd09ee699e0c62b7;p=helm.git

diff --git a/helm/gTopLevel/gTopLevel.ml b/helm/gTopLevel/gTopLevel.ml
index e0e0bfca3..2b9e101ab 100644
--- a/helm/gTopLevel/gTopLevel.ml
+++ b/helm/gTopLevel/gTopLevel.ml
@@ -1081,7 +1081,7 @@ exception AmbiguousInput;;
 
 (* A WIDGET TO ENTER CIC TERMS *)
 
-module Callbacks =
+module DisambiguateCallbacks =
  struct
   let output_html ?append_NL = output_html ?append_NL (outputhtml ())
   let interactive_user_uri_choice =
@@ -1093,7 +1093,7 @@ module Callbacks =
  end
 ;;
 
-module TermEditor' = ChosenTermEditor.Make(Callbacks);;
+module TermEditor' = ChosenTermEditor.Make (DisambiguateCallbacks);;
 
 (* OTHER FUNCTIONS *)