package util;

use Storable ();
use Scalar::Util ();

my $staterc = "$ENV{HOME}/.kgsueme";

our $state = -r $staterc ? Storable::retrieve($staterc) : {};

$::config = $state->{config} ||= {};

$::config->{speed} = 0;#d# optimize for speed or memory?
$::config->{conserve_memory} = 0; # try to conserve memory at the expense of speed
$::config->{randomize} = 0; # randomize placement of stones

sub save_config {
   &gtk::save_state;
   Storable::nstore($state, $staterc);
   appwin::status("save_state", "layout saved");
}

1;