removing unused code

Network/HTTP2/H2/Context.hs

@@ -133,20 +133,6 @@ newContext rinfo Config{..} cacheSiz connRxWS settings =
         | confBufferSize >= dlim = dlim
         | otherwise = confBufferSize
 
-makeMySettingsList :: Config -> Int -> WindowSize -> [(SettingsKey, Int)]
-makeMySettingsList Config{..} maxConc winSiz = myInitialAlist
-  where
-    -- confBufferSize is the size of the write buffer.
-    -- But we assume that the size of the read buffer is the same size.
-    -- So, the size is announced to via SETTINGS_MAX_FRAME_SIZE.
-    len = confBufferSize - frameHeaderLength
-    payloadLen = max defaultPayloadLength len
-    myInitialAlist =
-        [ (SettingsMaxFrameSize, payloadLen)
-        , (SettingsMaxConcurrentStreams, maxConc)
-        , (SettingsInitialWindowSize, winSiz)
-        ]
-
 ----------------------------------------------------------------
 
 isClient :: Context -> Bool