# HG changeset patch
# User mikael
# Date 1114279827 0
# Node ID 96d239239c7aa58972729505e7c4f481da1d46c0
# Parent  7fb72bc137320af534958c57e90aafedb45857b1
[/trunk] Changeset 123 by mikael

* Fix scrolling after /clear.


diff -r 7fb72bc13732 -r 96d239239c7a mcabber/src/screen.c
--- a/mcabber/src/screen.c	Fri Apr 22 22:06:53 2005 +0000
+++ b/mcabber/src/screen.c	Sat Apr 23 18:10:27 2005 +0000
@@ -631,7 +631,10 @@
   hbuf_top = win_entry->top;
   if (!hbuf_top) {
     hbuf_top = g_list_last(win_entry->hbuf);
-    nblines *= 3;
+    if (!win_entry->cleared)
+      nblines *= 3;
+    else
+      win_entry->cleared = FALSE;
   }
 
   n = 0;
@@ -703,6 +706,7 @@
     return;
 
   win_entry->cleared = TRUE;
+  win_entry->top = NULL;
 
   // Refresh the window
   scr_UpdateWindow(win_entry);