#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Mon, 11 Sep 2017 09:07:48 +0200
changeset 17685 65e3e0c8ea0c
parent 17684 ad637949d97a
child 17686 c6fc2da19287
#BUGFIX by cg class: DirectoryContentsBrowser changed: #selectNextFile (send #isEmptyOrNil instead of #isEmpty) #selectPreviousFile (send #isEmptyOrNil instead of #isEmpty) class: DirectoryContentsBrowser class changed: #directoryContentsBrowserMenu
DirectoryContentsBrowser.st
--- a/DirectoryContentsBrowser.st	Mon Sep 11 09:07:18 2017 +0200
+++ b/DirectoryContentsBrowser.st	Mon Sep 11 09:07:48 2017 +0200
@@ -640,6 +640,12 @@
                   itemValue: doCompareTwoFiles
                   translateLabel: true
                 )
+               (MenuItem
+                  enabled: hasTwoImageFilesSelected
+                  label: 'Delta between Images'
+                  itemValue: showDeltaBetweenTwoImageFiles
+                  translateLabel: true
+                )
                )
               nil
               nil
@@ -710,6 +716,8 @@
         nil
         nil
       )
+
+    "Modified: / 10-09-2017 / 16:53:44 / cg"
 !
 
 viewBrowserMenu
@@ -2060,7 +2068,7 @@
     |sel idx nextIdx nextItem|
 
     sel := selectionInFileList value.
-    sel isEmpty ifTrue:[
+    sel isEmptyOrNil ifTrue:[
         idx := 0
     ] ifFalse:[
         idx := browserItemList indexOf:(selectionInFileList value last).
@@ -2068,13 +2076,15 @@
     nextIdx := idx == browserItemList size ifTrue:[1] ifFalse:[idx + 1].
     nextItem := browserItemList at:nextIdx.
     self selectItems:{ nextItem }.
+
+    "Modified: / 11-09-2017 / 09:07:48 / cg"
 !
 
 selectPreviousFile
     |sel idx prevIdx prevItem|
 
     sel := selectionInFileList value.
-    sel isEmpty ifTrue:[
+    sel isEmptyOrNil ifTrue:[
         idx := browserItemList size + 1
     ] ifFalse:[
         idx := browserItemList indexOf:(selectionInFileList value first).
@@ -2082,6 +2092,8 @@
     prevIdx := idx == 1 ifTrue:[browserItemList size] ifFalse:[idx - 1].
     prevItem := browserItemList at:prevIdx.
     self selectItems:{ prevItem }.
+
+    "Modified: / 10-09-2017 / 15:12:27 / cg"
 !
 
 selectedFileItems