Cannot understand some code in presenter class

Hi...

I was just scanning the Presenter code and found the following method:
------
model: anObject
    "Set the model of the receiver to be anObject"
    model := anObject.
    self view notNil ifTrue: [self connectView]
------
Shouldn't view be checked for DeafObject instead? In Presenter>>initialize,
I found
view := DeafObject current.

Ciao

...Jochen