X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matitaB%2Fmatita%2FmatitaAuthentication.ml;h=77aeed15f599c24f73d476b71e81aad45cc593d3;hb=66b7f75467ba81224d961beda0ad0e55664c68b6;hp=d51eb2e4fae4a4ff7c0d2b0bb9ea508f049a7b3c;hpb=0466f6387b02f1d0644fb74eacca237e30589111;p=helm.git diff --git a/matitaB/matita/matitaAuthentication.ml b/matitaB/matita/matitaAuthentication.ml index d51eb2e4f..77aeed15f 100644 --- a/matitaB/matita/matitaAuthentication.ml +++ b/matitaB/matita/matitaAuthentication.ml @@ -109,7 +109,8 @@ let deserialize () = user_tbl := Marshal.from_channel utbl_ch; close_in utbl_ch; with - | Sys_error _ -> user_tbl := []); + | Sys_error _ -> + user_tbl := []; serialize()); (* old_sessions are now invalid *) session_tbl := []; ;;