gdb/gdbtk/library/globalpref.ith

   1 # Global preference class definition for GDBtk.
   2 # Copyright (C) 1998, 1999 Cygnus Solutions
   3 #
   4 # This program is free software; you can redistribute it and/or modify it
   5 # under the terms of the GNU General Public License (GPL) as published by
   6 # the Free Software Foundation; either version 2 of the License, or (at
   7 # your option) any later version.
   8 #
   9 # This program is distributed in the hope that it will be useful,
  10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # GNU General Public License for more details.
  13
  14
  15 itcl::class GlobalPref {
  16   inherit ManagedWin ModalDialog
  17
  18   private {
  19     variable _new
  20     variable _saved
  21     variable _icondirlist ""
  22     variable _original  ;# Original font settings
  23     variable _size      ;# Array tracking spinint values
  24     variable _fonts     ;# List of all available fonts for editing
  25     common tracing_labels
  26     common inited 0
  27
  28     method _init {}
  29     method _init_var {}
  30     method _build_win {}
  31     method _make_font_item {f name label font_list}
  32     method _resize_font_item_height {}
  33     method _change_icons {w args}
  34     method _change_font {font stupid implementation}
  35     method _change_size {direction font}
  36     method _ok {}
  37     method _apply {{deleteMe 0}}
  38     method _cancel {}
  39     method cancel {}
  40     method _toggle_tracing {win}
  41   }
  42
  43   public {
  44     method constructor {args}
  45     method destructor {}
  46   }
  47 }