--- a/DataSetBuilder.st	Wed Oct 15 18:06:07 1997 +0200
+++ b/DataSetBuilder.st	Thu Oct 16 15:18:23 1997 +0200
@@ -1010,7 +1010,9 @@
 
     (idx := selectedColumnIndex) ~~ 0 ifTrue:[
         self selectedColumnModel value:0.
+        columns removeIndex:idx.
         self seqList removeIndex:idx.
+        self updateColumnView.
     ].
 !