Subject: Patch for FvwmWharf and colorset updates

From: An Thi-Nguyen Le <[email-masked]>
Date: Sun, 27 May 2001 12:42:49 -0500

Attached is a small patch that fixes the FvwmWharf 
doesn't-update-when-colorset-changes bug.  Made against current CVS sources.

-- 
An Thi-Nguyen Le
|I thought there was something fishy about the butler.  Probably a Pisces,
|working for scale.
|		-- Firesign Theatre, "The Further Adventures of Nick Danger"
Index: modules/FvwmWharf/FvwmWharf.c
===================================================================
RCS file: /home/cvs/fvwm/fvwm/modules/FvwmWharf/FvwmWharf.c,v
retrieving revision 1.23
diff -u -r1.23 FvwmWharf.c
--- modules/FvwmWharf/FvwmWharf.c	2000/12/03 15:56:09	1.23
+++ modules/FvwmWharf/FvwmWharf.c	2001/05/27 17:39:18
@@ -2220,7 +2220,7 @@
 
   for(x = 0; x < num_folders; x++)
   {
-    XClearWindow(dpy, Folders[x].win);
+    /*XClearWindow(dpy, Folders[x].win);*/
     RedrawWindow(&Folders[x].win,num_folderbuttons, -1,
 		 Folders[x].cols, Folders[x].rows);
     for(y = 1; y <= Folders[x].count; y++)
@@ -2230,10 +2230,12 @@
       else
 	RedrawUnpushedOutline(&Folders[x].win, y, 1);
     }
-    XClearWindow(dpy, main_win);
-    RedrawWindow(&main_win,0, -1, num_rows, num_columns);
+    /*XClearWindow(dpy, main_win);*/
   }
+  XClearArea(dpy, main_win, 0, 0, 0, 0, True);
 
+  RedrawWindow(&main_win,0, -1, num_rows, num_columns);
+
   XSync(dpy, 0);
 
   return;
@@ -2251,6 +2253,8 @@
     colorset = LoadColorset(tline);
     change_colorset(colorset);
   }
+
+  RedrawWindow(&main_win,0, -1, num_rows, num_columns);
 
   return;
 }