Update of /cvsroot/tuxpaint/tuxpaint-config/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23430

Modified Files:
        defaults.cxx defaults.h tuxpaint-config2.cxx 
        tuxpaint-config2.fl 
Log Message:
Defaults Button works now

Index: defaults.cxx
===================================================================
RCS file: /cvsroot/tuxpaint/tuxpaint-config/src/defaults.cxx,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- defaults.cxx        10 Apr 2004 14:42:34 -0000      1.3
+++ defaults.cxx        10 Apr 2004 15:15:47 -0000      1.4
@@ -74,3 +74,42 @@
     CHECKBUTTON_usealternatesavedir        -> value (0);
 }
 
+void CB_SetActualTabToDefaults ()
+{
+    if ( TABE_videoandsound    -> visible () )
+    {
+       DEF_videoandsound       ();
+       return;
+    }
+    
+    if ( TABE_mouseandkeyboard -> visible () )
+    {
+       DEF_mouseandkeyboard    ();
+       return;
+    }
+
+    if ( TABE_simplification   -> visible () )
+    {
+       DEF_simplification      ();
+       return;
+    }
+
+    if ( TABE_locale           -> visible () )
+    {
+       DEF_locale              ();
+       return;
+    }
+    
+    if ( TABE_printing -> visible () )
+    {
+       DEF_printing            ();
+       return;
+    }
+    
+    if ( TABE_saving -> visible () )
+    {
+       DEF_saving              ();
+       return;
+    }
+}
+

Index: tuxpaint-config2.fl
===================================================================
RCS file: /cvsroot/tuxpaint/tuxpaint-config/src/tuxpaint-config2.fl,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- tuxpaint-config2.fl 10 Apr 2004 14:42:34 -0000      1.12
+++ tuxpaint-config2.fl 10 Apr 2004 15:15:47 -0000      1.13
@@ -257,6 +257,7 @@
     }
     Fl_Button BUTTON_defaults {
       label Defaults
+      callback {CB_SetActualTabToDefaults ();}
       xywh {15 388 96 32} box PLASTIC_UP_BOX down_box PLASTIC_DOWN_BOX labelfont 1 
align 64
     }
   }

Index: defaults.h
===================================================================
RCS file: /cvsroot/tuxpaint/tuxpaint-config/src/defaults.h,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- defaults.h  10 Apr 2004 14:42:34 -0000      1.1
+++ defaults.h  10 Apr 2004 15:15:47 -0000      1.2
@@ -12,6 +12,8 @@
 extern void DEF_printing               ();
 extern void DEF_saving                 ();
 
+extern void CB_SetActualTabToDefaults  ();
+
 
 #endif
 

Index: tuxpaint-config2.cxx
===================================================================
RCS file: /cvsroot/tuxpaint/tuxpaint-config/src/tuxpaint-config2.cxx,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- tuxpaint-config2.cxx        10 Apr 2004 14:42:34 -0000      1.12
+++ tuxpaint-config2.cxx        10 Apr 2004 15:15:47 -0000      1.13
@@ -133,6 +133,10 @@
 
 Fl_Button *BUTTON_defaults=(Fl_Button *)0;
 
+static void cb_BUTTON_defaults(Fl_Button*, void*) {
+  CB_SetActualTabToDefaults ();
+}
+
 Fl_Double_Window* Show_TPC_Window() {
   Fl_Double_Window* w;
   { Fl_Double_Window* o = WINDOW_tpc = new Fl_Double_Window(672, 424, gettext("Tux 
Paint Config v0.0.1"));
@@ -431,6 +435,7 @@
       o->box(FL_PLASTIC_UP_BOX);
       o->down_box(FL_PLASTIC_DOWN_BOX);
       o->labelfont(1);
+      o->callback((Fl_Callback*)cb_BUTTON_defaults);
       o->align(FL_ALIGN_CLIP);
     }
     o->end();

_______________________________________________
Tuxpaint-commits mailing list
[EMAIL PROTECTED]
http://tux4kids.net/mailman/listinfo/tuxpaint-commits

Reply via email to