Fill the workspace object list M Hewitson $Id: setWorkspaceObjsList.m,v 1.2 2008/01/22 20:45:22 hewitson Exp $
0001 function setWorkspaceObjsList(objs) 0002 0003 % Fill the workspace object list 0004 % 0005 % M Hewitson 0006 % 0007 % $Id: setWorkspaceObjsList.m,v 1.2 2008/01/22 20:45:22 hewitson Exp $ 0008 % 0009 0010 0011 id = findobj('Tag', 'workspaceObjsList'); 0012 0013 objlist = []; 0014 for j=1:length(objs) 0015 obj = objs(j); 0016 str = sprintf('%s\t\t(%s)', obj.name, obj.class); 0017 objlist = [objlist cellstr(str)]; 0018 end 0019 0020 set(id, 'Value', 1); 0021 set(id, 'String', objlist); 0022 0023