From 1ed9e2ae07d99acd25b1e7492e21dda6e3d19f8a Mon Sep 17 00:00:00 2001
From: Erthilo <erthilo@gmail.com>
Date: Sun, 6 May 2012 18:29:47 +0100
Subject: [PATCH] TG: (Does not actually change guns) Guns with ammo no longer
 melee at point-blank range.   They now fire normally. Guns without ammo you
 bash with. Revision: r3506 Author: 	 VivianFoxfoot

---
 code/defines/procs/gamehelpers.dm | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/code/defines/procs/gamehelpers.dm b/code/defines/procs/gamehelpers.dm
index 63d66d9e4d..a8fbd1f67a 100644
--- a/code/defines/procs/gamehelpers.dm
+++ b/code/defines/procs/gamehelpers.dm
@@ -286,6 +286,21 @@ proc/isInSight(var/atom/A, var/atom/B)
 	else
 		return 0
 
+
+proc/doafterattack(obj/target , obj/source)
+
+	if (istype(target, /obj/item/weapon/storage/ ))
+		return 0
+
+	else if (locate (/obj/structure/table, source.loc))
+		return 0
+
+	else if (!istype(target.loc, /turf/))
+		return 0
+
+	else
+		return 1
+
 proc/check_can_reach(atom/user, atom/target)
 	if(!in_range(user,target))
 		return 0