extensions.st
author Claus Gittinger <cg@exept.de>
Sat, 12 May 2018 14:24:33 +0200
changeset 4089 a64828e69680
parent 3144 eaa38e147e20
child 4139 6dffe5499f3b
permissions -rw-r--r--
class: CharacterArray comment/format in: #asMimeType
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3138
Claus Gittinger <cg@exept.de>
parents: 2759
diff changeset
     1
"{ Package: 'stx:libview2' }"!
2728
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
     2
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
     3
!CharacterArray methodsFor:'converting'!
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
     4
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
     5
asMimeType
4089
a64828e69680 class: CharacterArray
Claus Gittinger <cg@exept.de>
parents: 3144
diff changeset
     6
    "return myself as a mimeType instance"
a64828e69680 class: CharacterArray
Claus Gittinger <cg@exept.de>
parents: 3144
diff changeset
     7
2728
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
     8
    ^ MIMETypes mimeTypeFromString:self string
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
     9
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
    10
    "
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
    11
     'text/html' asMimeType isTextType
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
    12
     'text/html' asMimeType isImage
2759
668d1637f50c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2728
diff changeset
    13
     'image/gif' asMimeType isImage
4089
a64828e69680 class: CharacterArray
Claus Gittinger <cg@exept.de>
parents: 3144
diff changeset
    14
     'image/gif' asMimeType asMimeType
2728
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
    15
    "
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
    16
! !
9d97da90730c checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2727
diff changeset
    17
2759
668d1637f50c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2728
diff changeset
    18
!stx_libview2 class methodsFor:'documentation'!
668d1637f50c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2728
diff changeset
    19
668d1637f50c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2728
diff changeset
    20
extensionsVersion_CVS
4089
a64828e69680 class: CharacterArray
Claus Gittinger <cg@exept.de>
parents: 3144
diff changeset
    21
    ^ '$Header$'
2759
668d1637f50c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2728
diff changeset
    22
! !
3144
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    23
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    24
!stx_libview2 class methodsFor:'documentation'!
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    25
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    26
extensionsVersion_SVN
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    27
    ^ 'Id:'
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    28
! !
Claus Gittinger <cg@exept.de>
parents: 3138
diff changeset
    29