Missed cvs rm

This commit is contained in:
bket 2021-06-28 04:15:15 +00:00
parent fbfaf68789
commit c6b64b8f9b

View File

@ -1,14 +0,0 @@
$OpenBSD: patch-uicommon_ml,v 1.2 2020/11/03 19:45:30 bket Exp $
Index: uicommon.ml
--- uicommon.ml.orig
+++ uicommon.ml
@@ -506,7 +506,7 @@ let promptForRoots getFirstRoot getSecondRoot =
(* ---- *)
let makeTempDir pattern =
- let ic = Unix.open_process_in (Printf.sprintf "(mktemp --tmpdir -d %s.XXXXXX || mktemp -d -t %s) 2>/dev/null" pattern pattern) in
+ let ic = Unix.open_process_in (Printf.sprintf "(mktemp --tmpdir -d %s.XXXXXX || mktemp -d -t %s.XXXXXX) 2>/dev/null" pattern pattern) in
let path = input_line ic in
ignore (Unix.close_process_in ic);
path