diff --git a/src/tiny_httpd/nanoev_tiny_httpd.ml b/src/tiny_httpd/nanoev_tiny_httpd.ml
index b637122..e97905b 100644
--- a/src/tiny_httpd/nanoev_tiny_httpd.ml
+++ b/src/tiny_httpd/nanoev_tiny_httpd.ml
@@ -259,10 +259,10 @@ open struct
     slice.len <- 0
 end
 
-let create ?(masksigpipe = not Sys.win32) ?max_connections ?max_buf_pool_size
-    ?(timeout = 0.0) ?buf_size ?(get_time_s = Unix.gettimeofday)
-    ?(addr = "127.0.0.1") ?(port = 8080) ?sock ?middlewares ~new_thread () :
-    TH.Server.t =
+let create ?enable_logging ?(masksigpipe = not Sys.win32) ?max_connections
+    ?max_buf_pool_size ?(timeout = 0.0) ?buf_size
+    ?(get_time_s = Unix.gettimeofday) ?(addr = "127.0.0.1") ?(port = 8080) ?sock
+    ?middlewares ~new_thread () : TH.Server.t =
   let max_connections = get_max_connection_ ?max_connections () in
   let max_pool_size =
     match max_buf_pool_size with
@@ -300,4 +300,4 @@ let create ?(masksigpipe = not Sys.win32) ?max_connections ?max_buf_pool_size
     let tcp_server () = tcp_server_builder
   end in
   let backend = (module B : TH.Server.IO_BACKEND) in
-  TH.Server.create_from ?buf_size ?middlewares ~backend ()
+  TH.Server.create_from ?enable_logging ?buf_size ?middlewares ~backend ()
diff --git a/src/tiny_httpd/nanoev_tiny_httpd.mli b/src/tiny_httpd/nanoev_tiny_httpd.mli
index 7c858e5..1cf0a2a 100644
--- a/src/tiny_httpd/nanoev_tiny_httpd.mli
+++ b/src/tiny_httpd/nanoev_tiny_httpd.mli
@@ -1,6 +1,7 @@
 module TH = Tiny_httpd_core
 
 val create :
+  ?enable_logging:bool ->
   ?masksigpipe:bool ->
   ?max_connections:int ->
   ?max_buf_pool_size:int ->