view general/fileutils/removeext.m @ 44:3cedfd4549ef

Code added since initial check in.

% removeext - remove extension from a file name
%
% removeext :: string -> string.
function nm=removeext(path)
dot=max(strfind(path,'.'));
if isempty(dot), nm=path;
else nm=path(1:(dot-1));
end