/*
 * Author: Ruthberg
 * Deletes the currently selected gun profile from the profileNamespace
 *
 * Arguments:
 * Nothing
 *
 * Return Value:
 * Nothing
 *
 * Example:
 * call ace_atragmx_delete_gun
 *
 * Public: No
 */
#include "script_component.hpp"

private ["_index"];
_index = lbCurSel 6000;

if (_index == -1) exitWith {};

for "_i" from 0 to (count GVAR(currentGun)) - 1 do {
    if ((GVAR(currentGun) select _i) > _index) then {
        GVAR(currentGun) set [_i, (GVAR(currentGun) select _i) - 1];
    };
};

GVAR(gunList) set [_index, 0];
GVAR(gunList) = GVAR(gunList) - [0];

lbDelete [6000, _index];

profileNamespace setVariable ["ACE_ATragMX_gunList", GVAR(gunList)];