AbstractFileBrowser.st
changeset 19560 f80a79b25de7
parent 19558 db3db35c4205
child 19571 a446fb4de5d1
equal deleted inserted replaced
19559:3ffdac9f212b 19560:f80a79b25de7
  2873     ^ CodeExecutionLock new
  2873     ^ CodeExecutionLock new
  2874 ! !
  2874 ! !
  2875 
  2875 
  2876 !AbstractFileBrowser class methodsFor:'queries'!
  2876 !AbstractFileBrowser class methodsFor:'queries'!
  2877 
  2877 
       
  2878 hasASN1
       
  2879     "true if the asn1 package is loaded"
       
  2880 
       
  2881     |asn1ParserClass|
       
  2882 
       
  2883     asn1ParserClass := Smalltalk at:#'OSI::ASN1Parser'.
       
  2884     ^ [ asn1ParserClass notNil and:[asn1ParserClass isLoaded]]
       
  2885 !
       
  2886 
  2878 isAbstract
  2887 isAbstract
  2879     ^ self == AbstractFileBrowser
  2888     ^ self == AbstractFileBrowser
  2880 ! !
  2889 ! !
  2881 
  2890 
  2882 !AbstractFileBrowser class methodsFor:'queries-file'!
  2891 !AbstractFileBrowser class methodsFor:'queries-file'!
  9464 cannotGenerateSignatureFiles
  9473 cannotGenerateSignatureFiles
  9465     ^ self canGenerateSignatureFiles not
  9474     ^ self canGenerateSignatureFiles not
  9466 !
  9475 !
  9467 
  9476 
  9468 hasASN1
  9477 hasASN1
  9469     ^ [ OSI::ASN1Parser notNil 
  9478     ^ self class hasASN1
  9470         and:[OSI::ASN1Parser isLoaded]]
       
  9471 
       
  9472 !
  9479 !
  9473 
  9480 
  9474 hasASN1AndSelection
  9481 hasASN1AndSelection
  9475     ^ [ self hasSelection value 
  9482     ^ [ self hasSelection value 
  9476         and:[self currentSelectedFiles notEmptyOrNil
  9483         and:[self currentSelectedFiles notEmptyOrNil
  9477         and:[OSI::ASN1Parser notNil 
  9484         and:[self class hasASN1]]]
  9478         and:[OSI::ASN1Parser isLoaded]]]]
       
  9479 
  9485 
  9480     "Modified: / 17-02-2017 / 08:25:09 / cg"
  9486     "Modified: / 17-02-2017 / 08:25:09 / cg"
  9481 !
  9487 !
  9482 
  9488 
  9483 hasCBrowser
  9489 hasCBrowser