Fix: Detective dog collar retrieve & pet carriers mob specify (#789)

<!-- Пишите **НИЖЕ** заголовков и **ВЫШЕ** комментариев, иначе что то
может пойти не так. -->
<!-- Вы можете прочитать Contributing.MD, если хотите узнать больше. -->

## Что этот PR делает
### ПУПС ПОЧИНИ ПЕРЕНОСКИ, У ТЕБЯ МОБЫ ИСЧЕЗАЮТ КОГДА ИХ ОТТУДА
ВЫТАСКИВАЕШЬ...
 - Теперь с собаки детектива можно снять ошейник
- Теперь в переноску можно поместить только pet симплов (не лучший фикс,
но это лучше чем таскать с собой оперативника синдиката или демона в
переноске, тут все равно нужен рефактор)

## Почему это хорошо для игры
Меньше багов

## Изображения изменений
<!-- Если вы не меняли карту или спрайты, можете опустить эту секцию.
Если хотите, можете вставить видео. -->

## Тестирование
Проверял в игре

## Changelog

:cl:
fix: В переноску больше нельзя засунуть демонов, ревенантов,
оперативников... Синдиката?...
fix: Теперь можно снять ошейник с пса детектива
/:cl:

<!-- Оба :cl:'а должны быть на месте, что-бы чейнджлог работал! Вы
можете написать свой ник справа от первого :cl:, если хотите. Иначе
будет использован ваш ник на ГитХабе. -->
<!-- Вы можете использовать несколько записей с одинаковым префиксом
(Они используются только для иконки в игре) и удалить ненужные. Помните,
что чейнджлог должен быть понятен обычным игроком. -->
<!-- Если чейнджлог не влияет на игроков(например, это рефактор), вы
можете исключить всю секцию. -->

modular_ss220/mobs/code/pet_carrier.dm

@@ -68,6 +68,9 @@
 	if(target.mob_size > mob_size)
 		to_chat(user, "<span class='warning'>Ваша переноска слишком мала!</span>")
 		return FALSE
+	if(!istype(target, /mob/living/simple_animal/pet))
+		to_chat(user, "<span class='warning'>Это существо не очень похоже на ручное животное.</span>")
+		return FALSE
 	//if(target.mob_size < mob_size)
 	//	to_chat(user, "<span class='warning'>Ваша переноска слишком большая!</span>")
 	//	return FALSE

modular_ss220/mobs/code/simple_animal/pets/security_dogs.dm

@@ -49,7 +49,16 @@
 	tts_seed = "Thrall"
 
 /mob/living/simple_animal/pet/dog/security/detective/show_inv(mob/user)
-	return
+	if(user.incapacitated() || !Adjacent(user))
+		return
+	user.set_machine(src)
+
+	var/dat = 	{"<meta charset="UTF-8"><div align='center'><b>Inventory of [name]</b></div><p>"}
+	dat += "<br><B>Collar:</B> <A href='?src=[UID()];[pcollar ? "remove_inv=collar'>[pcollar]" : "add_inv=collar'>Nothing"]</A>"
+
+	var/datum/browser/popup = new(user, "mob[UID()]", "[src]", 440, 250)
+	popup.set_content(dat)
+	popup.open()
 
 /mob/living/simple_animal/pet/dog/security/show_inv(mob/user)
 	if(user.incapacitated() || !Adjacent(user))