]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/matitaGtkMisc.mli
Quit without saving dialog fixed
[helm.git] / matita / matita / matitaGtkMisc.mli
index 627909cd456e4e1b5969a8171e60d262469b0fc5..04a531216780997863f7bad05f0d26dc3dab826c 100644 (file)
@@ -122,8 +122,7 @@ class type gui =
 val ask_confirmation:
   title:string -> message:string -> 
   ?parent:#GWindow.window_skel ->
-  unit ->
-    [`YES | `NO | `CANCEL]
+  unit -> [`YES | `NO | `DELETE_EVENT ]
 
 val report_error:
   title:string -> message:string ->