Makes it so that holsters can be hidden by suit-slot items.

I have yet to actually make any suit-slot items hide holsters.

code/modules/client/preference_setup/loadout/loadout_accessories.dm

@@ -112,15 +112,15 @@
 
 /datum/gear/accessory/holster/hip
 	display_name = "holster, hip"
-	path = /obj/item/clothing/accessory/holster/hip
+	path = /obj/item/clothing/accessory/holster/visible/hip
 
 /datum/gear/accessory/holster/leg
 	display_name = "holster, leg"
-	path = /obj/item/clothing/accessory/holster/leg
+	path = /obj/item/clothing/accessory/holster/visible/leg
 
 /datum/gear/accessory/holster/waist
 	display_name = "holster, waist"
-	path = /obj/item/clothing/accessory/holster/waist
+	path = /obj/item/clothing/accessory/holster/visible/waist
 
 /datum/gear/accessory/tie
 	display_name = "tie, black"

code/modules/clothing/under/accessories/accessory.dm

@@ -11,6 +11,7 @@
 	var/image/inv_overlay = null	//overlay used when attached to clothing.
 	var/image/mob_overlay = null
 	var/overlay_state = null
+	var/concealed_holster = 0
 
 	sprite_sheets = list("Teshari" = 'icons/mob/species/seromi/ties.dmi') //Teshari can into webbing, too!
 

code/modules/clothing/under/accessories/holster.dm

@@ -3,6 +3,7 @@
 	desc = "A handgun holster."
 	icon_state = "holster"
 	slot = "utility"
+	concealed_holster = 1
 	var/obj/item/holstered = null
 
 /obj/item/clothing/accessory/holster/proc/holster(var/obj/item/I, var/mob/living/user)
@@ -115,18 +116,21 @@
 	desc = "A worn-out handgun holster. Perfect for concealed carry"
 	icon_state = "holster"
 
-/obj/item/clothing/accessory/holster/waist
+/obj/item/clothing/accessory/holster/visible
+	concealed_holster = 0
+
+/obj/item/clothing/accessory/holster/visible/waist
 	name = "waist holster"
 	desc = "A handgun holster. Made of expensive leather."
 	icon_state = "holster"
 	overlay_state = "holster_low"
 
-/obj/item/clothing/accessory/holster/hip
+/obj/item/clothing/accessory/holster/visible/hip
 	name = "hip holster"
 	desc = "A handgun holster slung low on the hip, draw pardner!"
 	icon_state = "holster_hip"
 
-/obj/item/clothing/accessory/holster/leg
+/obj/item/clothing/accessory/holster/visible/leg
 	name = "leg holster"
 	desc = "A tacticool handgun holster. Worn on the upper leg."
 	icon_state = "holster_hip"

code/modules/mob/living/carbon/human/examine.dm

@@ -4,6 +4,8 @@
 	var/skipjumpsuit = 0
 	var/skipshoes = 0
 	var/skipmask = 0
+	var/skiptie = 0
+	var/skipholster = 0
 
 	var/skipears = 0
 	var/skipeyes = 0
@@ -25,6 +27,13 @@
 			skiplegs |= 1
 			skipchest |= 1
 			skipgroin |= 1
+			skiptie |= 1
+			skipholster |= 1
+		else if(wear_suit.flags_inv & HIDETIE)
+			skiptie |= 1
+			skipholster |= 1
+		else if(wear_suit.flags_inv & HIDEHOLSTER)
+			skipholster |= 1
 		if(wear_suit.flags_inv & HIDESHOES)
 			skipshoes |= 1
 			skipfeet |= 1
@@ -105,10 +114,16 @@
 	if(w_uniform && !skipjumpsuit)
 		//Ties
 		var/tie_msg
-		if(istype(w_uniform,/obj/item/clothing/under))
+		if(istype(w_uniform,/obj/item/clothing/under) && !skiptie)
 			var/obj/item/clothing/under/U = w_uniform
 			if(U.accessories.len)
-				tie_msg += ". Attached to it is [lowertext(english_list(U.accessories))]"
+				if(skipholster)
+					var/list/accessories_visible
+					for(var/obj/item/clothing/accessory/A in U.accessories)
+						if((A.concealed_holster == 0))
+							accessories_visible.Add(A)
+					tie_msg += ". Attached to it is [lowertext(english_list(accessories_visible))]"
+				else tie_msg += ". Attached to it is [lowertext(english_list(U.accessories))]"
 
 		if(w_uniform.blood_DNA)
 			msg += "<span class='warning'>[T.He] [T.is] wearing \icon[w_uniform] [w_uniform.gender==PLURAL?"some":"a"] [(w_uniform.blood_color != SYNTH_BLOOD_COLOUR) ? "blood" : "oil"]-stained [w_uniform.name][tie_msg]!</span>\n"