Changeset 153

Timestamp:

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

Author:

bduin

Message:

 

Location:

prdatasets

Files:

• pr_download.m (modified) (1 diff)
• pr_download_uci.m (modified) (1 diff)
• pr_showdsets.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

prdatasets/pr_download_uci.m

@@ -31 +31 @@
 
 function varargout = pr_download_uci(name,varargin)
-%%
+%% make sur there is a dta subdir
+persistent DATADIREXISTS
+if isempty(DATADIREXISTS)
+  datasubdir = fullfile(fileparts(which(mfilename)),'data');
+  if exist(datasubdir,'dir') ~= 7
+    mkdir(datasubdir);
+  end
+  DATADIREXISTS = true;
+end
 
 %% handle old format

prdatasets/pr_showdsets.m

@@ -1 +1 @@
 %PR_SHOWDSETS Show datasets and store results in DSET
+
+global ASK
+ASK = false;
 
 forget = {'Contents','mfeat_all','check_','pr_'};