/* Authors: Arkeon */ /* Last update: 10.01.03 */ /* Version: 1.0 */ typeof class=S;; fun activate(o,from,cli,action,param,reply)= if !strcmp action (strcat (ObName o) ".set2all") then UsendCli this nil (ObUi o) "set2all" param else nil;; /*-------------*/ fun newOb(o)= ObRegisterAction o (strcatn (ObName o)::".set2all"::nil) @activate; 0;; /*-------------*/ fun IniPlug(file)= set class=getInfo strextr _getpack _checkpack file "name"; PlugRegister class @newOb nil; 0;;