[Octave-cvsupdate] SF.net SVN: octave:[10794] trunk/octave-forge/extra/ncArray/inst/nccoord.m

[<aba...@us...>]

Revision: 10794
          http://octave.svn.sourceforge.net/octave/?rev=10794&view=rev
Author:   abarth93
Date:     2012-07-31 14:43:11 +0000 (Tue, 31 Jul 2012)
Log Message:
-----------


Modified Paths:
--------------
    trunk/octave-forge/extra/ncArray/inst/nccoord.m

Modified: trunk/octave-forge/extra/ncArray/inst/nccoord.m
===================================================================
--- trunk/octave-forge/extra/ncArray/inst/nccoord.m	2012-07-31 14:33:36 UTC (rev 10793)
+++ trunk/octave-forge/extra/ncArray/inst/nccoord.m	2012-07-31 14:43:11 UTC (rev 10794)
@@ -38,7 +38,7 @@
 % check for coordinate dimensions
 for i=1:length(dims)
     % check if variable with the same name than the dimension exist
-    index = find(strcmp(dims{i},{finfo.Variables(:).Name}));
+    index = find(strcmp(dims{i},{finfo.Variables(:).Name}),1);
     if ~isempty(index)
         coord = addcoord(coord,dims{i},finfo);
     end
@@ -50,7 +50,7 @@
 function coord = addcoord(coord,name,finfo)
 
 % check if coordinate is aleady in the list
-if isempty(find(strcmp(name,{coord(:).name})))
+if isempty(find(strcmp(name,{coord(:).name}),1))
     
     % check if name is variable
     index = find(strcmp(name,{finfo.Variables(:).Name}));

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.