--- a/SelectionInListView.st	Fri Mar 06 10:19:46 2015 +0100
+++ b/SelectionInListView.st	Wed Mar 11 12:26:34 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -3539,6 +3541,8 @@
     |movedLine delta newSelection|
 
     self multipleSelectOk ifFalse:[^ self].
+    "D120784 - WB when invoked without any selection"
+    selection size == 0 ifTrue:[^ self].
 
     movedLine := self visibleLineToAbsoluteLine:(self visibleLineOfY:y).
 
@@ -4188,11 +4192,11 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.284 2015-02-04 23:14:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.285 2015-03-11 11:26:34 ca Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.284 2015-02-04 23:14:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.285 2015-03-11 11:26:34 ca Exp $'
 !
 
 version_HG