inherit COMMAND_BASE; int cmd(string which, string type) { string t, disp; if(!type) { disp = "Your settings are: "; foreach(t in TP->query_verbose_types()) disp += t + (TP->query_verbose(t) ? " (verbose) " : " (brief) "); write(disp + "\n"); } if(type == "all") { foreach(t in TP->query_verbose_types()) TP->set_verbose(t, which == "verbose"); write("Ok\n"); } else if(member_array(type, TP->query_verbose_types()) != -1) { TP->set_verbose(type, which == "verbose"); write("Ok\n"); } return 1; } mixed *query_patterns() { return ({ "<word'type'>", (: cmd("brief", $4[0]) :), "", (: cmd("brief", 0) :), }); } /* query_patterns() */