Change menu colors -- this seems to be the only way to get the

toggle-button colors to change.  Lets us (barely) see when
inertia and hrdiagram toggles are selected.

src/partipanel.fl

@@ -10,7 +10,7 @@ decl {\#include "partiview.H"} {}
 Function {make_window()} {open
 } {
   Fl_Window {ppui.mainwin} {open
-    xywh {588 137 385 445} box DOWN_BOX color 96 resizable visible
+    xywh {347 75 385 445} box DOWN_BOX color 96 resizable visible
   } {
     Fl_Pack {} {open
       xywh {0 0 385 445} color 96 resizable
@@ -21,18 +21,18 @@ Function {make_window()} {open
       } {
         Fl_Menu_Button {ppui.more} {
           label More open
-          xywh {0 0 30 20} color 35 labelsize 12 labelcolor 3 align 2
+          xywh {0 0 30 20} color 137 selection_color 8 labelsize 12 labelcolor 3 align 2
         } {
           menuitem {ppui.inertiaon} {
             label inertia
-            callback pp_inertia_on_cb
-            xywh {0 0 100 20} labelsize 12 labelcolor 3
+            callback pp_inertia_on_cb selected
+            xywh {0 0 100 20} type Toggle labelsize 12 labelcolor 3
             code0 {ppui.inertiaon = o;}
           }
           menuitem {ppui.hrdiagon} {
             label {H-R Diagram}
             callback pp_hrdiag_on_cb
-            xywh {0 0 100 20} type Toggle
+            xywh {0 0 100 20} type Toggle labelcolor 3
             code0 {ppui.hrdiagon = o;}
           }
         }
@@ -41,18 +41,18 @@ Function {make_window()} {open
         } {
           Fl_Menu_Button {ppui.obj} {
             label {[gN]}
-            callback pp_obj_cb open
-            xywh {35 0 25 20} color 35 labelsize 12 labelcolor 3 align 2
+            callback pp_obj_cb
+            xywh {35 0 25 20} color 137 labelsize 12 labelcolor 3 align 2
           } {}
         }
-        Fl_Group {} {open
+        Fl_Group {} {
           xywh {60 0 40 35} box FLAT_BOX color 96
         } {
           Fl_Menu_Button {ppui.nav} {
             label {Navi  }
             user_data {&ppui.st} user_data_type {struct stuff **}
             callback pp_nav_cb open
-            xywh {65 0 32 20} color 35 labelsize 12 labelcolor 3 align 2 textsize 12
+            xywh {65 0 32 20} color 137 labelsize 12 labelcolor 3 align 2 textsize 12
           } {}
         }
         Fl_Group {ppui.objgroup} {
@@ -266,10 +266,10 @@ Function {make_window()} {open
     }
   }
   Fl_Window {ppui.hrdiagwin} {open
-    xywh {642 553 284 234} resizable
+    xywh {152 482 284 234} resizable
     code0 {o->hide();} visible
   } {
-    Fl_Group {ppui.hrdiag} {open selected
+    Fl_Group {ppui.hrdiag} {open
       xywh {0 0 284 234} box DOWN_BOX color 0 resizable
       code0 {o->cursor(FL_CURSOR_CROSS);}
       class Fl_Plot