hasBindingThatBeginsWith: aString should be packaged with Shout

hasBindingThatBeginsWith: aString is exclusively used by 

```
styleNameIn: aVariableNode

	^ (aVariableNode scope hasBindingThatBeginsWith: self name)
		  ifTrue: [ #incompleteIdentifier ]
		  ifFalse: [ #undefinedIdentifier ]
```

All the methods and all the tests of such features should be placed in the Shout package
