From 26e9d3cd57587e3f102d7bf722c18edc3e7172ae Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Tue, 22 Feb 2022 11:24:41 +0900
Subject: [PATCH] fixing typo

---
 Network/Socket/Buffer.hsc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Network/Socket/Buffer.hsc b/Network/Socket/Buffer.hsc
index 84255b81..81759e4a 100644
--- a/Network/Socket/Buffer.hsc
+++ b/Network/Socket/Buffer.hsc
@@ -282,11 +282,11 @@ recvBufMsg s bufsizs clen flags = do
           with msgHdr $ \msgHdrPtr -> do
             len <- (fmap fromIntegral) <$>
 #if !defined(mingw32_HOST_OS)
-                throwSocketErrorWaitRead s "Network.Socket.Buffer.recvmg" $
+                throwSocketErrorWaitRead s "Network.Socket.Buffer.recvmsg" $
                       c_recvmsg fd msgHdrPtr _cflags
 #else
                 alloca $ \len_ptr -> do
-                    _ <- throwSocketErrorWaitReadBut (== #{const WSAEMSGSIZE}) s "Network.Socket.Buffer.recvmg" $
+                    _ <- throwSocketErrorWaitReadBut (== #{const WSAEMSGSIZE}) s "Network.Socket.Buffer.recvmsg" $
                             c_recvmsg fd msgHdrPtr len_ptr nullPtr nullPtr
                     peek len_ptr
 #endif