Changeset 1257

Timestamp:

07/08/09 07:39:26 (16 years ago)

Author:

Mathieu Morlighem

Message:

improved cell display

File:

• issm/trunk/src/m/classes/public/display/fielddisplay.m (modified) (1 diff)

issm/trunk/src/m/classes/public/display/fielddisplay.m

@@ -75 +75 @@
 
         %initialization
-        isstring=ischar(field{1});
+        string='{';
 
-        %is cell of string?
-        if isstring,
-                string='';
+        %go through the cell and fill string
+        if length(field)<5;
                 for i=1:length(field),
-                        parameter=field{i};
-                        isstring=isstring*ischar(parameter);
-                        string=[string parameter ' and '];
+                        if ischar(field{i}),
+                                string=[string ''''  field{i} ''','];
+                        elseif (isnumeric(field{i}) & length(field{i})==1)
+                                string=[string num2str(field{i}) ',' ];
+                        else
+                                string='{';
+                                break
+                        end
                 end
         end
+        if strcmp(string,'{'),
+                string=['(' num2str(size(field,1)) 'x' num2str(size(field,2)) ')'];
+        else
+                string=[string(1:end-1) '}'];
+        end
 
-        if isstring,
-                displayunit(offset,name,string(1:length(string)-5),comment);
-        else
-                displayunit(offset,name,['(' num2str(fieldsize(1)) 'x' num2str(fieldsize(2)) ')'],comment),
-        end
+        %call displayunit
+        displayunit(offset,name,string,comment);
 end