update

diff --git a/Git/PktLine.hs b/Git/PktLine.hs
index c7afb25d722a562750d8e5ab36a1cc2f5361230c..32509bd9a8183dc72934a77658280c124e5704fe 100644 (file)
--- a/Git/PktLine.hs
+++ b/Git/PktLine.hs
@@ -38,13 +38,9 @@ import Utility.FileSystemEncoding
 newtype PktLine = PktLine B.ByteString
        deriving (Show)
 
-{- Maximum possible length of the string encoded in PktLine;
- - the length header takes up 4 bytes.
- -
- - While the header can express lengths up to 65535,
- - git actually does not support packets larger than 65520
- - (including the header). See "LARGE_PACKET_MAX" in the git source code.
- -}
+{- Maximum allowed length of the string encoded in PktLine
+ - is slightly shorter than the absolute maximum possible length.
+ - Git does not accept anything longer than this. -}
 maxPktLineLength :: Int
 maxPktLineLength = 65520 - pktLineHeaderLength