+INSERT INTO forum_boards (fcid,fbid,board) VALUES(7,-5,'Raid logs');
+INSERT INTO forum_access (fbid,gid) VALUES(-5,1);
+INSERT INTO forum_access (fbid,gid) VALUES(-5,3);
-/*Changes when target is unclaimed */
-CREATE OR REPLACE FUNCTION unclaim_target()
- RETURNS "trigger" AS
-$BODY$
-if ($_TD->{event} eq 'DELETE' && $_TD->{old}{launched} eq 't'){
- my $uid = $_TD->{old}{uid};
- my $query = spi_prepare(q{UPDATE users
- SET attack_points = attack_points - 1
- WHERE uid = $1},'int4');
- spi_exec_prepared($query,$uid);
- spi_freeplan($query);
-}
-return;
-$BODY$ LANGUAGE 'plperl' VOLATILE;
-ALTER FUNCTION updated_target() OWNER TO ndawn;
+ALTER TABLE raids ADD COLUMN ftid INTEGER;
-CREATE TRIGGER unclaim_target AFTER DELETE
- ON raid_claims FOR EACH ROW
- EXECUTE PROCEDURE PUBLIC.unclaim_target();
+CREATE OR REPLACE FUNCTION add_raid() RETURNS trigger
+AS $$
+DECLARE
+ rec RECORD;
+BEGIN
+ INSERT INTO forum_threads (ftid,fbid,subject,uid) VALUES
+ (DEFAULT,-5,'Raid ' || NEW.id,-3) RETURNING ftid INTO rec;
+ NEW.ftid := rec.ftid;
+ return NEW;
+END;
+$$
+ LANGUAGE plpgsql;
+
+CREATE TRIGGER add_raid
+ BEFORE INSERT ON raids
+ FOR EACH ROW
+ EXECUTE PROCEDURE add_raid();