Index: /issm/trunk-jpl/src/m/os/recursivepath.m
===================================================================
--- /issm/trunk-jpl/src/m/os/recursivepath.m	(revision 13001)
+++ /issm/trunk-jpl/src/m/os/recursivepath.m	(revision 13001)
@@ -0,0 +1,39 @@
+function p = recursivepath(d)
+%RECURSIVEPATH - generate paths in a directory
+%
+%   this routine is equivalent to Matlab's genpath except that it skips CVS and
+%   .svn directories
+%
+%   Usage:
+%      p = recursivepath(d)
+
+%initialize path to be returned
+p = '';
+sep=pathsep;  %directory separator
+
+% Generate path based on given root directory
+files=dir(d);
+if isempty(files)
+	return
+end
+
+% Add d to the path even if it is empty.
+p = [p d sep];
+
+% set logical vector for subdirectory entries in d
+isdir = logical(cat(1,files.isdir));
+
+% Recursively goes through the subdirectories of d
+dirs=files(isdir); % select only directory entries from the current listing
+for i=1:length(dirs)
+	dirname=dirs(i).name;
+	if ~strcmp(dirname,'.')    & ...
+		~strcmp(dirname,'..')   & ...
+		~strcmp(dirname,'.svn') & ...
+		~strcmp(dirname,'CVS')  & ...
+		~strncmp(dirname,'@',1) & ... %Method directories not allowed in MATLAB path
+		~strcmp(dirname,'private')    %private directories not allowed in MATLAB path
+
+		p = [p recursivepath(fullfile(d,dirname))];
+	end
+end
Index: sm/trunk-jpl/src/m/recursivepath.m
===================================================================
--- /issm/trunk-jpl/src/m/recursivepath.m	(revision 13000)
+++ 	(revision )
@@ -1,38 +1,0 @@
-function p = recursivepath(d)
-%RECURSIVEPATH - generate paths in a directory
-%
-%   this routine is equivalent to Matlab's genpath except that it skips CVS and .svn directories
-%
-%   Usage:
-%      p = recursivepath(d)
-
-%initialize path to be returned
-p = '';
-sep=pathsep;  %directory separator
-
-% Generate path based on given root directory
-files=dir(d);
-if isempty(files)
-	return
-end
-
-% Add d to the path even if it is empty.
-p = [p d sep];
-
-% set logical vector for subdirectory entries in d
-isdir = logical(cat(1,files.isdir));
-
-% Recursively goes through the subdirectories of d
-dirs=files(isdir); % select only directory entries from the current listing
-for i=1:length(dirs)
-	dirname=dirs(i).name;
-	if ~strcmp(dirname,'.')    & ...
-		~strcmp(dirname,'..')   & ...
-		~strcmp(dirname,'.svn') & ...
-		~strcmp(dirname,'CVS')  & ...
-		~strncmp(dirname,'@',1) & ... %Method directories not allowed in MATLAB path
-		~strcmp(dirname,'private')    %private directories not allowed in MATLAB path
-
-		p = [p recursivepath(fullfile(d,dirname))];
-	end
-end