[Seaside] WAFileLibrary and non-alphanumerics

[Boris Popov]

In case anyone else comes across a case where filenames include
non-alphanumeric characters like dashes and underscores, you'll notice
they get stripped by default, which won't work very well with your
style-sheets. I'd made the following three changes in my subclass of it,
sacrificing readability a bit, but it's not like I ever look at
selectors there anyway.

(class) asSelector: aFilename
 ^('hex' , aFilename asByteArray asHexString) asSymbol.

isFileSelector: aSymbol
	^aSymbol startsWith: 'hex'.

asFilename: aSelector
 ^(ByteArray fromHexString: (aSelector
					copyFrom: 4
					to: aSelector size)) asString.

Cheers,

-Boris

-- 
+1.604.689.0322
DeepCove Labs Ltd.
4th floor 595 Howe Street
Vancouver, Canada V6C 2T5
http://tinyurl.com/r7uw4

boris at deepcovelabs.com

CONFIDENTIALITY NOTICE

This email is intended only for the persons named in the message
header. Unless otherwise indicated, it contains information that is
private and confidential. If you have received it in error, please
notify the sender and delete the entire message including any
attachments.

Thank you.