# vim: set foldmarker={,}:
use strict;
use Tweetodon::Base;

package Tweetodon::Account;
@Tweetodon::Account::ISA = qw(Tweetodon::Base);
use JSON;
use Tweetodon::Application;
use Data::Dumper;

sub dbTable :lvalue { "accounts"; }
sub orderBy :lvalue { "username ASC"; }

# Class functions
# Object methods
sub application {
	my $self = shift;
	my $retVal = Tweetodon::Application->get_by("id", $self->{"data"}->{"application_id"});
	return $retVal;
}

1;