don't try to load state from file on startup if doesn't exist

Author: yasunariw

lib/context.ml

@@ -74,13 +74,15 @@ let refresh_state ctx =
   match ctx.state_filepath with
   | None -> Ok ctx
   | Some path ->
-    log#info "loading saved state from file %s" path;
-    ( match get_local_file path with
-    | Error e -> fmt_error "error while getting local file: %s\nfailed to get state from file %s" e path
-    | Ok file ->
-      let state = State_j.state_of_string file in
-      Ok { ctx with state }
-    )
+    if Caml.Sys.file_exists path then begin
+      log#info "loading saved state from file %s" path;
+      match get_local_file path with
+      | Error e -> fmt_error "error while getting local file: %s\nfailed to get state from file %s" e path
+      | Ok file ->
+        let state = State_j.state_of_string file in
+        Ok { ctx with state }
+    end
+    else Ok ctx
 
 let print_config ctx =
   let cfg = get_config_exn ctx in

src/notabot.ml

@@ -73,7 +73,7 @@ let secrets =
 
 let state =
   let doc = "state file" in
-  Arg.(value & opt (some file) None & info [ "state" ] ~docv:"STATE" ~doc)
+  Arg.(value & opt (some string) None & info [ "state" ] ~docv:"STATE" ~doc)
 
 let gh_payload =
   let doc = "JSON file containing a github webhook payload" in