#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package RPS::DB::Item::ClientOptions;
use strict;
use warnings;
use lib '/app/tools/common/lib';
use Common::DB::Item;
use Common::RSApp;
use Common::Assert;

use base 'Common::DB::Item';

use constant kTable => 'client_options';
use constant kDB    => Common::DB::Item::kClientDB();

sub Get {
    my ( $class, $key ) = @_;
    assert($key);

    my $o = $class->Lookup( name => $key );
    if( $o ) {
        return $o->value;
    } else {
        return undef;
    }
}

sub Set {
    my ( $class, $key, $value ) = @_;
    assert($key);

    my $o = $class->Lookup( name => $key );
    if( !$o ) {
        $o = $class->Create( name => $key );
    }

    $o->value($value);
    $o->save;
}

1;