annotate +mpm/check.m @ 5:6c46515ee860

Add function for checking if the currently loaded paths are correct
author Jonatan Werpers <jonatan@werpers.com>
date Mon, 10 Sep 2018 16:35:17 +0200
parents
children 19c4af287596
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
1 % Check if the current proejct settings are correct
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
2 % The right version is in the path
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
3 % The right version is at the top of the path
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
4 %
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
5 % Useful to put at the top of some scripts
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
6 function check()
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
7 folders = split(path(), pathsep);
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
8
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
9 sp = mpm.subpaths();
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
10 for i = 1:length(sp)
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
11 if ~isAtTop(sp{i}, fullfile(pwd, sp{i}), folders)
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
12 error('Subpaths are not correctly set. Try running mpm.set()');
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
13 end
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
14 end
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
15 end
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
16
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
17 function b = isAtTop(subpath, fullsubpath, paths)
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
18 for i = 1:length(paths)
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
19 if ~endsWith(paths{i}, subpath)
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
20 continue
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
21 end
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
22
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
23 b = strcmp(fullsubpath, paths{i});
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
24 return
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
25 end
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
26
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
27 b = false;
6c46515ee860 Add function for checking if the currently loaded paths are correct
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
28 end