From ab96c738d3bdaa3a972d524b59b65b66fa803daa Mon Sep 17 00:00:00 2001 From: Prashanth Mundkur Date: Thu, 4 Jun 2009 19:01:27 -0700 Subject: [PATCH] Fix typo. --- libs/stdext/eventloop.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/libs/stdext/eventloop.ml b/libs/stdext/eventloop.ml index ec2a3d9..ff32fab 100644 --- a/libs/stdext/eventloop.ml +++ b/libs/stdext/eventloop.ml @@ -279,7 +279,7 @@ let dispatch_read t fd cs = if read_bytes = 0 then cs.callbacks.shutdown_callback t fd else begin - debug "<- %s" (String.sub buf 0 read_bytes); + dbg "<- %s" (String.sub buf 0 read_bytes); cs.callbacks.recv_callback t fd buf 0 read_bytes end with @@ -298,7 +298,7 @@ let do_send t fd cs = (match Unix.write fd payload 0 payload_len with | 0 -> () | sent -> - debug "-> %s" (String.sub payload 0 sent); + dbg "-> %s" (String.sub payload 0 sent); Buffer.clear cs.send_buf; Buffer.add_substring cs.send_buf payload sent (payload_len - sent) ) -- 2.39.5