diff --git a/src/frontends/ChangeLog b/src/frontends/ChangeLog
index 64dff8903f..c9d31306c0 100644
--- a/src/frontends/ChangeLog
+++ b/src/frontends/ChangeLog
@@ -1,3 +1,9 @@
+2002-12-03  Lars Gullik Bjønnes  <larsbj@gullik.net>
+
+	* screen.C (fitManualCursor): add delay if we have a selection
+	going 
+	(fitCursor): ditto
+
 2002-12-01  Lars Gullik Bjønnes  <larsbj@gullik.net>
 
 	* several files: ws changes
diff --git a/src/frontends/screen.C b/src/frontends/screen.C
index 74fa21184b..403647da4d 100644
--- a/src/frontends/screen.C
+++ b/src/frontends/screen.C
@@ -169,8 +169,13 @@ bool LyXScreen::fitManualCursor(BufferView * bv, LyXText * text,
 	if (newtop != text->first_y) {
 		draw(text, bv, newtop);
 		text->first_y = newtop;
+		// Make the screen not scroll too fast when
+		// we have a selection.
+		if (text->selection.set())
+			usleep(200000);
 		return true;
 	}
+
 	return false;
 }
 
@@ -230,8 +235,14 @@ bool LyXScreen::fitCursor(LyXText * text, BufferView * bv)
 	// Is a change necessary?
 	int const newtop = topCursorVisible(text->cursor, text->first_y);
 	bool const result = (newtop != text->first_y);
-	if (result)
+	if (result) {
 		draw(text, bv, newtop);
+		// Make the screen not scroll too fast when
+		// we have a selection.
+		if (text->selection.set())
+			usleep(200000);
+	}
+
 	return result;
 }