Authored by Anthony Boyer

Notes parsing fix

@@ -101,7 +101,12 @@ for c=1:evsize % Navigate all available events @@ -101,7 +101,12 @@ for c=1:evsize % Navigate all available events
101 end 101 end
102 for j=1:length(KeepEvent) % Navigate all stim events 102 for j=1:length(KeepEvent) % Navigate all stim events
103 noteName = char(Notes{KeepEvent(j)}); 103 noteName = char(Notes{KeepEvent(j)});
104 - tmp=find(noteName==','); if ~isempty(tmp);if noteName(tmp(1)-3)=='-'; noteName(tmp(1))=' ';end;end%BUC 104 + tmp=find(noteName==',');
  105 + if ~isempty(tmp) && strcmpi(patientCode(5:end),'BUC')
  106 + if noteName(tmp(1)-3)=='-';
  107 + noteName(tmp(1))=' ';
  108 + end
  109 + end%BUC
105 noteName = regexprep(noteName,',','.');%BUC 110 noteName = regexprep(noteName,',','.');%BUC
106 noteName = strrep(noteName, ' ','_'); 111 noteName = strrep(noteName, ' ','_');
107 noteName = regexprep(noteName,'�','u'); %OD 112 noteName = regexprep(noteName,'�','u'); %OD