set_drive_info

 current directoryのDrive番号をcurrent_driveに設定し、
 drive_info構造体を更新する。(Windows環境のみ)

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function [this] = set_drive_info(this)
0002 % current directoryのDrive番号をcurrent_driveに設定し、
0003 % drive_info構造体を更新する。(Windows環境のみ)
0004 %
0005 % Copyright (C) 2011, ATR All Rights Reserved.
0006 % License : New BSD License(see VBMEG_LICENSE.txt)
0007 
0008 
0009 if length( this.private.drive_info )
0010   current_drive = 1;
0011   for ii=1:length( this.private.drive_info )
0012     if strncmp( upper(this.public.current_dir),...
0013       this.private.drive_info(ii).drive,...
0014       length(this.private.drive_info(ii).drive) )
0015       current_drive = ii;
0016       this.private.drive_info(ii).cwd = this.public.current_dir;
0017       break;
0018     end
0019   end
0020   this.private.current_drive = current_drive;
0021 end
0022