From 04b8ff0e5705d4e01d24c0b73037947c3c8043b5 Mon Sep 17 00:00:00 2001 From: snoewchen Date: Fri, 27 Nov 2015 09:39:25 +0100 Subject: [PATCH] Core.Std.Zone is now Time.Zone Zone moved into the Time module in version 109.42.00 --- code/imperative-programming/time_converter.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/code/imperative-programming/time_converter.ml b/code/imperative-programming/time_converter.ml index 4ab8caf..bb6647e 100644 --- a/code/imperative-programming/time_converter.ml +++ b/code/imperative-programming/time_converter.ml @@ -6,10 +6,10 @@ let () = match In_channel.input_line stdin with | None -> failwith "No timezone provided" | Some zone_string -> - let zone = Zone.find_exn zone_string in + let zone = Time.Zone.find_exn zone_string in let time_string = Time.to_string_abs (Time.now ()) ~zone in Out_channel.output_string stdout (String.concat - ["The time in ";Zone.to_string zone;" is ";time_string;".\n"]); + ["The time in ";Time.Zone.to_string zone;" is ";time_string;".\n"]); Out_channel.flush stdout