Changeset 87 for trunk/src/civ.m


Ignore:
Timestamp:
Apr 27, 2010, 7:56:28 PM (14 years ago)
Author:
sommeria
Message:

improvement of vioew_field
suppress spurious 'todo' path in civ

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/civ.m

    r86 r87  
    21332133
    21342134% 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     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
     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%     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
    21562156
    21572157% set the list of files and check them
Note: See TracChangeset for help on using the changeset viewer.