[Turn off line numbering]1: arg value, @args; 2: var action, list, item, out; 3: 4: if (value && value[1] in ["+", "-"]) { 5: if (value[1] == "-") 6: action = 'del; 7: else 8: action = 'add; 9: list = [substr(value, 2)]; 10: } else { 11: action = 'set; 12: list = value.explode_english_list(); 13: } 14: out = hash item in (list) to ([(> $object_lib.to_dbref(item) <), 1]); 15: if (action == 'set) 16: return [action, out]; 17: else 18: return [action, dict_keys(out)[1]];
// Created 01-Sep-1998 as a part of ColdCore, see: @help Credit