X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Intel.pm;h=63c2ebdafab28c32815133d0f460ee808b42079e;hb=7f37aeb466310930ecb7e57e841c285372ffa8aa;hp=1fc7680d1a5866afe745c3f77731f46696cc7db7;hpb=2f3dd8afdb3ea3661cd8f6ba127240fb8dbcd08a;p=NDIRC.git

diff --git a/Intel.pm b/Intel.pm
index 1fc7680..63c2ebd 100644
--- a/Intel.pm
+++ b/Intel.pm
@@ -41,7 +41,7 @@ sub setHostile {
 		return;
 	}
 	if(my $user = dc()){
-		my $findid = $ND::DBH->prepare_cached(q{SELECT planetid(?,?,?,0)});
+		my $findid = $ND::DBH->prepare_cached(q{SELECT planetid(?,?,?,tick())});
 		my ($id) = $ND::DBH->selectrow_array($findid,undef,$x,$y,$z);
 		my $rv = $ND::DBH->do(q{UPDATE planets SET planet_status = 'Hostile' WHERE id = $1},undef,$id);
 		if ($rv == 1){
@@ -65,7 +65,7 @@ sub setNick {
 	}
 	if (my $user = officer){
 		my $findid = $ND::DBH->prepare_cached(q{SELECT nick, id FROM planets
-			WHERE id = planetid(?,?,?,0)});
+			WHERE id = planetid(?,?,?,tick())});
 		my ($oldnick,$id) = $ND::DBH->selectrow_array($findid,undef,$x,$y,$z);
 		if ($ND::DBH->do('UPDATE planets SET nick = $1 WHERE id = $2'
 				,undef,$nick,$id)){