--- MITgcm_contrib/gmaze_pv/pv_checkpath.m 2006/06/16 21:12:20 1.1 +++ MITgcm_contrib/gmaze_pv/pv_checkpath.m 2006/06/16 21:28:39 1.2 @@ -20,8 +20,13 @@ % Try to found needed subdirectories: -subdir = 'subfct'; -fullsubdir = strcat(packdir,sla,subdir); -if isempty(findstr(path,fullsubdir)) - addpath(fullsubdir) -end + +subdir = struct('name',{'subfct','test'}); + +for id = 1 : size(subdir(:),1) + subdirname = subdir(id).name; + fullsubdir = strcat(packdir,sla,subdirname); + if isempty(findstr(path,fullsubdir)) + addpath(fullsubdir) + end %if +end %for