Fix showing as Unknown at NTSL investigation log.

This commit is contained in:
eswordthecat
2015-02-07 19:09:11 +08:00
parent dc8f9d2f63
commit 0fef0d378d
2 changed files with 18 additions and 10 deletions

View File

@@ -593,13 +593,15 @@ var/global/list/obj/machinery/telecomms/telecomms_list = list()
rawcode = t
/obj/machinery/telecomms/server/proc/admin_log(var/mob/mob)
var/msg = "[key_name(mob)] has compiled a script to [src.id]"
var/msg="[mob.name] has compiled a script to server [src]:"
diary << msg
diary << rawcode
investigation_log("ntsl", "[msg]<br /><pre>[rawcode]</pre>")
if (length(rawcode)) // Let's not bother the admins for empty code.
message_admins("[mob.real_name] ([mob.key]) has compiled and uploaded a NTLS script to [src.id] ([mob.x],[mob.y],[mob.z] - <A HREF='?_src_=holder;adminplayerobservecoodjump=1;X=[mob.x];Y=[mob.y];Z=[mob.z]'>JMP</a>)",0,1)
message_admins("[msg] ([formatJumpTo(mob)])", 0, 1)
/obj/machinery/telecomms/server/proc/compile(var/mob/user)

View File

@@ -1298,23 +1298,29 @@ proc/move_alien_ship()
alien_ship_location = 1
return
proc/formatJumpTo(var/location,var/where="")
proc/formatJumpTo(location, where = "")
var/turf/loc
if(istype(location,/turf/))
if (isturf(location))
loc = location
else
loc = get_turf(location)
if (where == "")
where = formatLocation(loc)
return "<A HREF='?_src_=holder;adminplayerobservecoodjump=1;X=[loc.x];Y=[loc.y];Z=[loc.z]'>[where]</a>"
proc/formatLocation(var/location)
proc/formatLocation(location)
var/turf/loc
if(istype(location,/turf/))
if (isturf(location))
loc = location
else
loc = get_turf(location)
var/area/A = get_area(location)
return "[A.name] - [loc.x],[loc.y],[loc.z]"
proc/formatPlayerPanel(var/mob/U,var/text="PP")