Changeset 20382

Timestamp:

03/30/16 13:47:21 (9 years ago)

Author:

Mathieu Morlighem

Message:

CHG: make issmdir Windows friendly

File:

• issm/trunk-jpl/src/m/os/issmdir.m (modified) (2 diffs)

issm/trunk-jpl/src/m/os/issmdir.m

@@ -7 +7 @@
 %Initialize output ISSM_DIR
 ISSM_DIR='';
+slash=filesep();
 
 %Get ISSM_DIR from function path (we do not want to force users to edit their bashrc)
@@ -12 +13 @@
 
 %issmdir might be in bin,
-pos=strfind(path,'bin/issmdir.m');
+pos=strfind(path,['bin' slash 'issmdir.m']);
 if ~isempty(pos),
         ISSM_DIR=path(1:pos-1);
 else
-        pos=strfind(path,'src/m/os/issmdir.m');
+        pos=strfind(path,['src' slash 'm' slash 'os' slash 'issmdir.m']);
         if ~isempty(pos),
                 ISSM_DIR=path(1:pos-1);