TGnomeClient

type TGnomeClient = record

  theobject: TGtkObject;

  smc_conn: gpointer;

  input_id: gint;

  client_id: Pgchar;

  previous_id: Pgchar;

  config_prefix: Pgchar;

  global_config_prefix: Pgchar;

  static_args: PGList;

  clone_command: PPgchar;

  current_directory: Pgchar;

  discard_command: PPgchar;

  environment: PGHashTable;

  process_id: pid_t;

  theprogram: Pgchar;

  resign_command: PPgchar;

  restart_command: PPgchar;

  restart_style: TGnomeRestartStyle;

  shutdown_command: PPgchar;

  user_id: Pgchar;

  save_style: TGnomeSaveStyle;

  interact_style: TGnomeInteractStyle;

  shutdown: gboolean;

  fast: gboolean;

  state: TGnomeClientState;

  save_phase_2_requested: gboolean;

  save_successfull: gboolean;

  save_yourself_emitted: gboolean;

  interaction_keys: PGSList;

end;