FileApplicationNoteBook.st
changeset 17950 d63391605406
parent 17900 fafb77eead65
child 17951 ea5c9eaf94de
equal deleted inserted replaced
17949:f4ada786326b 17950:d63391605406
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 2002 by eXept Software AG
     4  COPYRIGHT (c) 2002 by eXept Software AG
     3               All Rights Reserved
     5               All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
  4187 ! !
  4189 ! !
  4188 
  4190 
  4189 !FileApplicationNoteBook::ImageViewApplication class methodsFor:'queries'!
  4191 !FileApplicationNoteBook::ImageViewApplication class methodsFor:'queries'!
  4190 
  4192 
  4191 canOpenItem:anItem
  4193 canOpenItem:anItem
  4192 
  4194     |mimeType imageReader|
  4193     ^ (anItem hasMimeType and:[anItem mimeType isImageType])
  4195 
       
  4196     ^ (anItem hasMimeType 
       
  4197     and:[(mimeType := anItem mimeType) isImageType
       
  4198     "/ do not trust the mimetype - the contents may not correspond to its mimetype...
       
  4199     and:[(imageReader := MIMETypes imageReaderForType:mimeType) notNil
       
  4200     and:[imageReader isValidImageFile:anItem fileName]]])
  4194 !
  4201 !
  4195 
  4202 
  4196 wantNewApplicationAnyway
  4203 wantNewApplicationAnyway
  4197 
  4204 
  4198     ^ false
  4205     ^ false