#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Sun, 12 Aug 2018 10:37:09 +0200
changeset 5882 7c3471a43007
parent 5881 34608d309383
child 5883 c441a78650db
#REFACTORING by cg class: NoteBookView comment/format in: #selectTab:
NoteBookView.st
--- a/NoteBookView.st	Fri Aug 10 12:08:03 2018 +0200
+++ b/NoteBookView.st	Sun Aug 12 10:37:09 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -3529,8 +3527,13 @@
 
     |idx|
 
-    idx := list findFirst:[:eachNotebookTab| eachNotebookTab label = aTab or:[eachNotebookTab tabItem = aTab]].
+    idx := list findFirst:[:eachNotebookTab| 
+                    eachNotebookTab label = aTab 
+                    or:[eachNotebookTab tabItem = aTab]
+           ].
     self selection:(idx == 0 ifTrue:nil ifFalse:idx)
+
+    "Modified (format): / 11-08-2018 / 21:38:37 / Claus Gittinger"
 !
 
 selectedTab