anchor.diff:  		M = text2mob(M)
   	if(M.key)
   		var/mob/Player/Y = src
  -		if(derobe)
  -			Y.curPM = new /atom/movable/PM("Subject","Body","[Y.pname ? Y.pname : Y.prevname]","[M.pname ? M.pname : M.name]")
  -		else
  -			Y.curPM = new /atom/movable/PM("Subject","Body","[Y.pname ? Y.pname : Y.name]","[M.pname ? M.pname : M.name]")
  -		Y.curPM.body = input("Input the main text of the Private Message being sent to [M.derobe ? M.prevname : M.name]") as message|null
  +		Y.curPM = new /atom/movable/PM("Subject","Body","[formatName(Y)]","[formatName(M)]")
  +		Y.curPM.body = input("Input the main text of the Private Message being sent to [formatName(M)]") as message|null
   		if(!Y.curPM.body)return
   		src << link("byond://?src=\ref[src];action=pm_Send")
   
  
positive.code: 			for(var/aPM in Y.pmsRec)
  				pmcounter++
  				if(aPM == src.curPM)break
  			if(Y.derobe)
  				src.curPM.pmTo = Y.prevname
  			src << "Private Message Sent to <a href='?src=\ref[src];action=pm_reply;replynametext=[Y.pname ? Y.pname :src.curPM.pmTo]'>[src.curPM.pmTo]</a>."
  			if(src.name == "Deatheater")
  				Y << "You have received a <a href='?src=\ref[Y];action=pm_inbox_readmsg;msgid=[pmcounter]'>new private message</a> from <a href='?src=\ref[Y];action=pm_reply;replynametext=[src.pname ? src.pname : src.prevname]'>[src.prevname]</a>."
  			else
  				Y << "You have received a <a href='?src=\ref[Y];action=pm_inbox_readmsg;msgid=[pmcounter]'>new private message</a> from <a href='?src=\ref[Y];action=pm_reply;replynametext=[src.pname ? src.pname : src.name]'>[src]</a>."
  			winset(Y,"mainwindow","flash=2")
  mob/Player/verb/PM(var/p in Players())
  	var/mob/M = p
  
negative.code: 			else if(Y.pmsRec.len > 100&&Y.pmsSen.len > 100)
  				src.pmsSen.Add(src.curPM)
  				spawn()alert("That person cannot receive private messages because their inbox and outbox is full. This message has been added to your outbox.")
  				Y << "<b>[formatName(src)] tried to send you a PM, but you couldn't receive it because your inbox AND outbox has over 100 PMs each already. Delete some."
  				return
  			else if(Y.pmsRec.len > 100)
  				src.pmsSen.Add(src.curPM)
  				spawn()alert("That person cannot receive private messages because their inbox is full. This message has been added to your outbox.")
  				Y << "<b>[formatName(src)] tried to send you a PM, but you couldn't receive it because your inbox has over 100 PMs already. Delete some."
  				return
  			else if(Y.pmsSen.len > 100)
  				src.pmsSen.Add(src.curPM)
  				spawn()alert("That person cannot receive private messages because their outbox is full. This message has been added to your outbox.")
  				Y << "<b>[formatName(src)] tried to send you a PM, but you couldn't receive it because your outbox has over 100 PMs already. Delete some."
  				return
  			else if("[formatName(src)]" in Y.blockedpeeps)
  				alert("That person does not wish to receive private messages at the moment.")
  