From e4a6d3c94cc9f640d6f7d1123a86a3906b458492 Mon Sep 17 00:00:00 2001 From: Siraaj Khandkar Date: Wed, 14 Nov 2018 14:04:08 -0500 Subject: [PATCH] Quote outputted paths --- dups.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dups.ml b/dups.ml index 941d8fa..ba1fb0c 100644 --- a/dups.ml +++ b/dups.ml @@ -112,7 +112,7 @@ let main input = let n_paths = StrSet.cardinal paths in if n_paths > 1 then begin printf "%s %d\n%!" (Digest.to_hex digest) n_paths; - List.iter (StrSet.elements paths) ~f:(printf " %s\n%!") + List.iter (StrSet.elements paths) ~f:(printf " %S\n%!") end ) paths_by_digest; -- 2.20.1