File: DiskRoot.m

package info (click to toggle)
psychtoolbox-3 3.0.9%2Bsvn2579.dfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 63,408 kB
  • sloc: ansic: 73,310; cpp: 11,139; objc: 3,129; sh: 1,669; python: 382; php: 272; makefile: 172; java: 113
file content (13 lines) | stat: -rw-r--r-- 286 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
function ThisDisk = DiskRoot
% DiskName = DiskRoot
%
% Purpose:  Find the name of the disk for the current working directory.

% History:
% 1/24/08		mpr scavenged the code from his personal files

CurDir = pwd;
SepPos = find(CurDir == filesep);
ThisDisk = CurDir(1:SepPos(1));

return;