#FEATURE by cg
class: AbstractFileFinderApplicationComponent
added: #hasTwoImageFilesSelected
--- a/AbstractFileFinderApplicationComponent.st Mon Sep 11 09:07:04 2017 +0200
+++ b/AbstractFileFinderApplicationComponent.st Mon Sep 11 09:07:18 2017 +0200
@@ -486,6 +486,15 @@
hasTwoFilesSelected
^ self selectionHolder value size == 2
+!
+
+hasTwoImageFilesSelected
+ |sel|
+
+ sel := self selectionHolder value.
+ ^ (sel size == 2) and:[ sel conform:[:fn | fn asFilename mimeTypeFromName isImageType] ]
+
+ "Created: / 10-09-2017 / 16:54:55 / cg"
! !
!AbstractFileFinderApplicationComponent methodsFor:'tasks'!