[Seaside] SSL

[Ramon Leon]

> > These are from my WASession subclass:
> > 
> > actionUrlForKey: aString
> > 	| url |
> > 	url := super actionUrlForKey: aString.
> > 	self useSSL ifTrue: [url scheme: #https; port: 443].
> > 	^ url
> > 	
> > useSSL
> > 	^ (currentRequest headers includesKey: 'via')
> > 
> > Avi
> 
> Now we're talking, sweet.  One question, this looks like it 
> changes the config, does this apply to this one request only, 
> or is this actually changing the app config?

Never mind, dumb question, didn't read the code close enough before I
responded.