Please don't forget peekFor:

2010/1/14  <commits at source.squeak.org>:
> Andreas Raab uploaded a new version of Network to project The Trunk:
> http://source.squeak.org/trunk/Network-ar.50.mcz
>
> ==================== Summary ====================
>
> Name: Network-ar.50
> Author: ar
> Time: 13 January 2010, 10:30:53.169 pm
> UUID: 6a3131ca-4e1b-1a45-87bc-8712a12f8d12
> Ancestors: Network-ul.49
>
> Fix SocketStream>>peek.
>
> =============== Diff against Network-ul.49 ===============
>
> Item was changed:
>  ----- Method: SocketStream>>peek (in category 'stream in') -----
>  peek
>        "Return next byte, if inBuffer is empty
>        we recieve some more data and try again.
>        Do not consume the byte."
>
>        self atEnd ifTrue: [^nil].
>        self isInBufferEmpty ifTrue:
>                [self receiveData.
>                self atEnd ifTrue: [^nil]].
> +       ^inBuffer at: lastRead+1!
> -       ^inBuffer at: lastRead!
>
>
>