"verbose" argument of remove is now optional (default false)

[helm.git] / helm / matita / matitaSync.ml

diff --git a/helm/matita/matitaSync.ml b/helm/matita/matitaSync.ml
index fc952ba4f02662577ea0d22f3f3a2caf5a7d893c..95dab03607493fb3f56e8ddccecaadefb92cf755 100644 (file)
--- a/helm/matita/matitaSync.ml
+++ b/helm/matita/matitaSync.ml
@@ -288,7 +288,7 @@ let time_travel ~present ~past =
     
 let last_baseuri = ref ""
 
-let remove ~verbose uri =
+let remove ?(verbose=false) uri =
   let derived_uris_of_uri uri =
     UriManager.innertypesuri_of_uri uri ::
     UriManager.univgraphuri_of_uri uri ::