RenameDataset.m

function RenameDataset(imPath, datasetName)
    [imD, jsonDir, jsonFile] = MicroscopeData.ReadMetadataFile(imPath);
    if ( isempty(imD) )
        return
    end
    
    oldDatasetName = imD.DatasetName;
    
    oldFile = fullfile(jsonDir,jsonFile);
    delete(oldFile);
    
    imD.DatasetName = datasetName;
    MicroscopeData.CreateMetadata(imPath, imD);
    
    flist = dir(fullfile(imPath, [oldDatasetName '*.klb']));
    
    inNames = {flist.name}.';
    guardName = regexptranslate('escape', oldDatasetName);
    outNames = regexprep(inNames, [guardName '(.*)'], [datasetName '$1']);
    
    for i=1:length(outNames)
        if ( strcmp(inNames{i},outNames{i}) )
            continue;
        end
%         fprintf('%s --> %s\n', inNames{i}, outNames{i});
        movefile(fullfile(imPath,inNames{i}), fullfile(imPath,outNames{i}));
    end
end