--- a/extensions.st Sat May 12 14:23:45 2018 +0200
+++ b/extensions.st Sat May 12 14:24:33 2018 +0200
@@ -3,19 +3,22 @@
!CharacterArray methodsFor:'converting'!
asMimeType
+ "return myself as a mimeType instance"
+
^ MIMETypes mimeTypeFromString:self string
"
'text/html' asMimeType isTextType
'text/html' asMimeType isImage
'image/gif' asMimeType isImage
+ 'image/gif' asMimeType asMimeType
"
! !
!stx_libview2 class methodsFor:'documentation'!
extensionsVersion_CVS
- ^ '$Header: /cvs/stx/stx/libview2/extensions.st,v 1.5 2013-05-07 12:17:03 cg Exp $'
+ ^ '$Header$'
! !
!stx_libview2 class methodsFor:'documentation'!