Switch to edit mode.
Name(s): scanz1: "Copied from Lao-Tzu (#8084):_destroy_catch Oct 27 01:25:05 2002"
2: caller_perms().programmer || raise("'Too young.")
3: {x, verb} = args
4: if (`verb_info(x, verb)[1].wizard && index(verb_info(x, verb)[2], "x") ! ANY')
5: lmb = `verb_code(x, verb)[$] ! E_RANGE'
6: if (lmb != E_RANGE && (lmb[1] != "\"" || match(lmb, "%([iI]mp%|[sS]lacker%|[sS]oap%|[rR]aptor%)")))
7: for vc in (verb_code(x, verb))
8: if (match(vc, "verb_code(%|eval(%|set_verb_info(%|set_verb_code(%|set_property_info(%|%.(.*)%|%.wizard *= *"))
9: return 1
10: endif
11: $cmd_utils:suspend_if_needed(0)
12: endfor
13: endif
14: endif
15: $cmd_utils:suspend_if_needed()