/*
 * Author: PabstMirror
 * Returns if a target is being carried. (from ace_dragging)
 *
 * Arguments:
 * 0: Target Unit <OBJECT>
 *
 * Return Value:
 * Is being carried <BOOL>
 *
 * Example:
 * [bob] call ace_medical_fnc_isBeingCarried
 *
 * Public: No
 */
#include "script_component.hpp"

PARAMS_1(_target);

private "_owner";

_owner = _target getVariable [QEGVAR(common,owner), objNull];

if (isNull _owner) exitWith {false};

(_owner getVariable [QEGVAR(dragging,carriedObject), objNull]) == _target