Fixes 4 runtimes (#12974)

* Fixes proc: /datum/money_account/proc/charge

* Fixes necropolis_chests.dm,214 proc: /obj/item/rod_of_asclepius/attack_self

* fixes: give.dm,25 proc: /mob/living/carbon/verb/give

* Fixes: game.dm,495 proc: /proc/pollCandidates

code/__HELPERS/game.dm

@@ -478,7 +478,10 @@ proc/pollCandidates(Question, be_special_type, antag_age_check = FALSE, poll_tim
 			G << 'sound/misc/notice2.ogg'//Alerting them to their consideration
 			if(flashwindow)
 				window_flash(G.client)
-			switch(alert(G,Question,"Please answer in [poll_time/10] seconds!","No","Yes","Not This Round"))
+			var/ans = alert(G,Question,"Please answer in [poll_time/10] seconds!","No","Yes","Not This Round")
+			if(!G?.client)
+				return
+			switch(ans)
 				if("Yes")
 					to_chat(G, "<span class='notice'>Choice registered: Yes.</span>")
 					if((world.time-time_passed)>poll_time)//If more than 30 game seconds passed.

code/modules/economy/ATM.dm

@@ -71,7 +71,7 @@ log transactions
 				playsound(loc, pick('sound/items/polaroid1.ogg', 'sound/items/polaroid2.ogg'), 50, 1)
 				for(var/obj/item/stack/spacecash/S in T)
 					S.use(S.amount)
-				authenticated_account.charge(-cash_amount, null, "Credit deposit", terminal_id = machine_id, dest_name = "Terminal")
+				authenticated_account.charge(-cash_amount, null, "Credit deposit", machine_id, "Terminal")
 
 /obj/machinery/atm/proc/reconnect_database()
 	for(var/obj/machinery/computer/account_database/DB in GLOB.machines)

code/modules/mining/lavaland/necropolis_chests.dm

@@ -189,7 +189,7 @@
 		return
 	var/failText = "<span class='warning'>The snake seems unsatisfied with your incomplete oath and returns to its previous place on the rod, returning to its dormant, wooden state. You must stand still while completing your oath!</span>"
 	to_chat(itemUser, "<span class='notice'>The wooden snake that was carved into the rod seems to suddenly come alive and begins to slither down your arm! The compulsion to help others grows abnormally strong...</span>")
-	if(do_after(itemUser, 40, target = itemUser))
+	if(do_after_once(itemUser, 40, target = itemUser))
 		itemUser.say("I swear to fulfill, to the best of my ability and judgment, this covenant:")
 	else
 		to_chat(itemUser, failText)

code/modules/mob/living/carbon/give.dm

@@ -18,10 +18,11 @@
 		to_chat(usr, "<span class='notice'>That's not exactly something you can give.</span>")
 		return
 	if(target.r_hand == null || target.l_hand == null)
-		switch(alert(target,"[usr] wants to give you \a [I]?",,"Yes","No"))
+		var/ans = alert(target,"[usr] wants to give you \a [I]?",,"Yes","No")
+		if(!I || !target)
+			return
+		switch(ans)
 			if("Yes")
-				if(!I)
-					return
 				if(target.incapacitated() || usr.incapacitated())
 					return
 				if(!Adjacent(target))