function ctxt=subst_ctxt(scs_m,str1,str2) ctxt=scs_m.props.context; for i=1:size(ctxt,1) if strindex(ctxt(i),str1)<>[] then ctxt(i)=str2; end end endfunction