Changeset 87 for trunk/src/civ.m
- Timestamp:
- Apr 27, 2010, 7:56:28 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/civ.m
r86 r87 2133 2133 2134 2134 % for Windows system find the UBC path name if needed 2135 if ~isunix & isequal(todo_path(1:2),'\\') & isequal(filebase(2:3),':\')2136 cur_dir=pwd;2137 if ~isequal(cur_dir(2:3),':\')2138 cd(matlabroot); %move to the Matlab root directory if the current Matlab dir does not allow the dos command or is M:2139 end2140 [ss,ww]=dos(['net use ' filebase(1:2)]);2141 if isequal(ss,0)2142 rankpath=findstr(ww,'\\');2143 if ~isempty(rankpath)2144 wwrest=ww(rankpath:end);2145 rankend=min(find(double(wwrest)==10))-1;2146 filebase=[wwrest(1:rankend) filebase(3:end)];2147 set(handles.RootName,'String',filebase);2148 end2149 else2150 msgbox_uvmat('ERROR','for BATCH option, UBC file names, beginning by \\, are needed');2151 % set(handles.BATCH, 'Enable','On')2152 % set(handles.BATCH,'BackgroundColor',[1 0 0])2153 return2154 end2155 end2135 % if ~isunix & isequal(todo_path(1:2),'\\') & isequal(filebase(2:3),':\') 2136 % cur_dir=pwd; 2137 % if ~isequal(cur_dir(2:3),':\') 2138 % cd(matlabroot); %move to the Matlab root directory if the current Matlab dir does not allow the dos command or is M: 2139 % end 2140 % [ss,ww]=dos(['net use ' filebase(1:2)]); 2141 % if isequal(ss,0) 2142 % rankpath=findstr(ww,'\\'); 2143 % if ~isempty(rankpath) 2144 % wwrest=ww(rankpath:end); 2145 % rankend=min(find(double(wwrest)==10))-1; 2146 % filebase=[wwrest(1:rankend) filebase(3:end)]; 2147 % set(handles.RootName,'String',filebase); 2148 % end 2149 % else 2150 % msgbox_uvmat('ERROR','for BATCH option, UBC file names, beginning by \\, are needed'); 2151 % % set(handles.BATCH, 'Enable','On') 2152 % % set(handles.BATCH,'BackgroundColor',[1 0 0]) 2153 % return 2154 % end 2155 % end 2156 2156 2157 2157 % set the list of files and check them
Note: See TracChangeset
for help on using the changeset viewer.