# -------------------------------------------------------------------------------------
# flo::Category
# -------------------------------------------------------------------------------------
#
#       Author : Jean-Michel Hiver (jhiver@cisedi.com).
#    Copyright : (c) MKDoc Holdings Ltd, 2001
# 
#      Unauthorized modification, use, reuse, distribution or redistribution
#      of this module is stricly forbidden.
#
#    Description:
#
#      A subclass of flo::sql::IndexedTable that manages Categories.
#      Very similar to lib::sql::Category, but strips out all the <.*> tags
#
# -------------------------------------------------------------------------------------
package flo::Category;
use lib::Exception;
use lib::sql::Category;
use flo::IndexedTable;
use strict;
use vars qw /@ISA/;
@ISA = qw /flo::IndexedTable/;


# All the method should be the exact same as with lib::sql::Category,
# thus want to import all of them
no strict;
for (keys %lib::sql::Category::)
{
    *$_ = $lib::sql::Category::{$_} if ($_ !~ /[A-Z]+/);
}
use strict;


1;
