Xcos MVC: allow passing mlists as Superblocks' subdiagrams
[scilab.git] / scilab / modules / xcos / macros / xcosPal.sci
index cdce8fa..0eba944 100644 (file)
@@ -60,11 +60,11 @@ function pal = xcosPal(name, scs_m)
 
     if exists("name", "l") == 0 then
         name = "New palette";
-    elseif isempty(name) then
-        name = "New palette";
     elseif typeof(name) == "diagram" then
         scs_m = name;
         name = "New palette";
+    elseif isempty(name) then
+        name = "New palette";
     end
     // loading the scicos_diagram macro
     if exists("scicos_diagram", "a") == 0 then loadXcosLibs(), end
@@ -83,7 +83,7 @@ function pal = xcosPal(name, scs_m)
     [],        [],      [],      []);
 
     // find palette name
-    if ~isempty(scs_m.objs) then
+    if length(scs_m.objs) > 0 then
         name = scs_m.props.title(1);
     end