-- Classified Ads Package
--
-- @author Deds Castillo (deds@infiniteinfo.com)
-- @creation-date 2002-10-08
-- @cvs-id $Id: images-create.sql,v 1.1 2003/07/16 04:52:31 rmello Exp $
--

create function inline_0 ()
returns integer as'
begin
    PERFORM content_type__create_type (
        ''ca_image'',                   -- object_type
	    ''image'',                      -- supertype
        ''Classified Ads Image'',       -- pretty_name
        ''Classified Ads Images'',      -- pretty_plural
        ''cr_ca_images'',               -- table_name
        ''ca_image_id'',                -- id_column
        ''ca_images__name''         -- name_method
    );

-- register child relations
    PERFORM content_type__register_child_type (
        ''ca_ad'',                      -- parent_type
        ''ca_image'',                   -- child_type
        ''ad_images_rel'',              -- relation_tag
        0,                              -- min_n
        null                            -- max_n
    );

-- register mime_types
    PERFORM content_type__register_mime_type (
        ''ca_image'',                   -- content_type
	    ''image/gif''                   -- mime_type
    );

    PERFORM content_type__register_mime_type (
        ''ca_image'',                   -- content_type
	    ''image/jpeg''                   -- mime_type
    );

    return null;
end;' language 'plpgsql';

select inline_0();
drop function inline_0();