diff --git a/code/modules/admin/verbs/debug.dm b/code/modules/admin/verbs/debug.dm index 80d4c649473..6970fa9265a 100644 --- a/code/modules/admin/verbs/debug.dm +++ b/code/modules/admin/verbs/debug.dm @@ -269,7 +269,7 @@ log_admin("[key_name(usr)] gave away direct control of [M] to [newkey].") SSblackbox.record_feedback("tally", "admin_verb", 1, "Give Direct Control") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! -/client/proc/cmd_admin_areatest(on_station) +/client/proc/cmd_admin_areatest(on_station, filter_maint) set category = "Mapping" set name = "Test Areas" @@ -312,6 +312,9 @@ log_message = "station z-levels" else log_message = "all z-levels" + if(filter_maint) + dat += "Maintenance Areas Filtered Out" + log_message += ", with no maintenance areas" message_admins(span_adminnotice("[key_name_admin(usr)] used the Test Areas debug command checking [log_message].")) log_admin("[key_name(usr)] used the Test Areas debug command checking [log_message].") @@ -324,6 +327,8 @@ var/turf/picked = pick(area_turfs) if(is_station_level(picked.z)) if(!(A.type in areas_all) && !is_type_in_typecache(A, station_areas_blacklist) && is_type_in_typecache(A, station_areas_whitelist)) + if(filter_maint && istype(A, /area/station/maintenance)) + continue areas_all.Add(A.type) else if(!(A.type in areas_all)) areas_all.Add(A.type) @@ -463,6 +468,11 @@ set name = "Test Areas (STATION ONLY)" cmd_admin_areatest(TRUE) +/client/proc/cmd_admin_areatest_station_no_maintenance() + set category = "Mapping" + set name = "Test Areas (STATION - NO MAINT)" + cmd_admin_areatest(on_station = TRUE, filter_maint = TRUE) + /client/proc/cmd_admin_areatest_all() set category = "Mapping" set name = "Test Areas (ALL)" diff --git a/code/modules/admin/verbs/mapping.dm b/code/modules/admin/verbs/mapping.dm index 719aa475db7..9e9c05f2843 100644 --- a/code/modules/admin/verbs/mapping.dm +++ b/code/modules/admin/verbs/mapping.dm @@ -35,6 +35,7 @@ GLOBAL_LIST_INIT(admin_verbs_debug_mapping, list( /client/proc/cmd_admin_grantfullaccess, /client/proc/cmd_admin_areatest_all, /client/proc/cmd_admin_areatest_station, + /client/proc/cmd_admin_areatest_station_no_maintenance, #ifdef TESTING /client/proc/see_dirty_varedits, #endif