From 29157f7f029eb7d7c1be1094445371e430048110 Mon Sep 17 00:00:00 2001 From: Stavros Polymenis Date: Tue, 1 Nov 2016 23:27:36 +0000 Subject: [PATCH] stray space --- src/ymd.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ymd.ml b/src/ymd.ml index b58cd52..2d560c4 100644 --- a/src/ymd.ml +++ b/src/ymd.ml @@ -100,7 +100,7 @@ let with_meta_kv meta (k,v) = | "categories"-> of_str_list meta meta_categories v | "series" -> of_str_list meta meta_series v | "uuid" -> - (match Id.of_string v with Some id -> (meta_uuid ^= id) meta | None -> meta) + (match Id.of_string v with Some id -> (meta_uuid ^= id) meta | None -> meta) | _ -> meta let with_kv ymd (k,v) =