anchor.diff:  					dat += "<td>Alien</td>"
   				dat += {"<td>[(M.client ? "[M.client]" : "No client")]</td>
   				<td align=center><A HREF='?src=\ref[src];adminplayeropts=\ref[M]'>X</A></td>
  -				<td align=center><A HREF='?src=\ref[src];player_info=[M.ckey]'>X</A></td>
  +				<td align=center><A HREF='?src=\ref[src];player_info=[M.ckey]'>[player_has_info(M.ckey) ? "Info" : "N/A"] </A></td>
   				<td align=center><A href='?src=\ref[usr];priv_msg=\ref[M]'>PM</A></td>
   				"}
   				switch(is_special_character(M))
  
positive.code: 					dat += "<td>Alien</td>"
  				dat += {"<td>[M.client?"[M.client]":"No client"]</td>
  				<td align=center><A HREF='?src=\ref[src];adminplayeropts=\ref[M]'>X</A></td>
  				<td align=center><A HREF='?src=\ref[src];player_info=[M.ckey]'>X</A></td>
  				<td align=center><A href='?src=\ref[usr];priv_msg=\ref[M]'>PM</A></td>
  				"}
  				switch(is_special_character(M))
  
negative.code: 	author // admin who authored the information
  	content // text content of the information
  
  /obj/admins/proc/player_has_info(var/key as text)
  	var/savefile/info = new("data/player_saves/[copytext(key, 1, 2)]/[key]/info.sav")
  	var/list/infos
  	info >> infos
  	if(!infos || !infos.len) return 0
  	else return 1
  
  /obj/admins/proc/show_player_info(var/key as text)
  	set category = "Admin"
  