Patch for FvwmWharf and colorset updates

[An Thi-Nguyen Le]

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;
 }