view general/fileutils/removeext.m @ 19:1eb0ea29ec40

Doesn't belong here.

% 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