annotate general/fileutils/removeext.m @ 54:9bcf5e133bf0

Added from old stats library.

% 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