-- 
-- packages/vocabulary/sql/postgresql/upgrade/upgrade-0.7-0.8.sql
-- 
-- @author Joel Aufrecht (joel@aufrecht.org)
-- @creation-date 2004-02-21
-- @cvs-id $Id: upgrade-0.7-0.8.sql,v 1.1 2004/02/23 23:00:07 joela Exp $
--

create or replace function vocab_word__delete (integer)
returns integer as '
declare
    p_id alias for $1;
begin
    delete from vocab_word
        where id = p_id;
    PERFORM acs_object__delete(p_id);
    return 0;

end;
' language 'plpgsql';