Changeset 153 for prdatasets/pr_download.m

Timestamp:

01/12/20 23:00:36 (5 years ago)

Author:

bduin

Message:

 

File:

• prdatasets/pr_download.m (modified) (1 diff)

prdatasets/pr_download.m

@@ -75 +75 @@
 function [a,new] = pr_download(url,datname,varargin)
 
+%% make sur there is a data subdir
+persistent DATADIREXISTS
+if isempty(DATADIREXISTS)
+  datasubdir = fullfile(fileparts(which(mfilename)),'data');
+  if exist(datasubdir,'dir') ~= 7
+    mkdir(datasubdir);
+  end
+  DATADIREXISTS = true;
+end
+
+%%
 if nargin >= 3
   % this can be removed when all mfiles in prdatasets call the new version