use strict;
return 1;

=head1 Name

OSSTag - A Social Tagging Engine

Copyright (c) 2006 Open Source Development Labs, Inc.

Object: assoziations (taglists)

CREATE TABLE osstag_assoziations (
	id int(11) NOT NULL auto_increment,
	semmap_fk int(11) NOT NULL,
	original_tag varchar(255) NOT NULL,
	normalized_tag varchar(255) NOT NULL,
	PRIMARY KEY  (id)
);

=cut

package osstag_obj_assoziations;
use osstag_obj_semmap;

sub new($$$$)
{
	my $class = shift;
	my $self = {};
	bless $self, $class;

	my ($id, $semmap, $original_tag, $normalized_tag) = @_;
	$self->{id} = $id;
	$self->{semmap} = $semmap;
	bless $self->{semmap}, 'osstag_obj_semmap';
	$self->{original_tag} = $original_tag;
	$self->{normalized_tag} = $normalized_tag;

	$self->{semmap}->addAssoziation($self);
	return $self;
}

=head1 License

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License 
version 2 as published by the Free Software Foundation.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

=head1 Version

Version: 0.2

Date:    07-JUN-2006

=head1 Author

Author:  Jan Kechel (jan@kechel.de)

=cut

# the end