From: Michael Andreen <harv@ruin.nu>
Date: Tue, 22 Jan 2008 08:14:52 +0000 (+0100)
Subject: proper tick for planetid
X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=7f37aeb466310930ecb7e57e841c285372ffa8aa;p=NDIRC.git

proper tick for planetid
---

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)){