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