Mercurial > hg > ltpda
diff m-toolbox/classes/@repogui2/setWorkspaceObjsList.m @ 0:f0afece42f48
Import.
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 23 Nov 2011 19:22:13 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/m-toolbox/classes/@repogui2/setWorkspaceObjsList.m Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,20 @@ +% Fill the workspace object list +% +% M Hewitson +% +% $Id: setWorkspaceObjsList.m,v 1.3 2011/04/08 08:56:37 hewitson Exp $ +% +function setWorkspaceObjsList(mainfig, objs) + + id = findobj(mainfig.handle, 'Tag', 'RepoguiWorkspaceObjsList'); + + objlist = []; + for j=1:length(objs) + obj = objs(j); + str = sprintf('%s\t\t(%s)', obj.name, obj.class); + objlist = [objlist cellstr(str)]; + end + + set(id, 'Value', 1); + set(id, 'String', objlist); +end