Patch allowing commands of the type delete('*.*') to be run successfully with Octave.

git-svn-id: https://www.dynare.org/svn/dynare/trunk@2740 ac1d8469-bf42-47a9-8791-bf33cf982152
time-shift
ratto 2009-06-09 07:23:38 +00:00
parent 4b850c0db3
commit 9c9b1feb05
1 changed files with 15 additions and 0 deletions

15
matlab/mydelete.m Normal file
View File

@ -0,0 +1,15 @@
function mydelete(fname,pname)
if nargin ==0,
disp('mydelete(fname)')
return
end
if nargin ==1,
pname='';
end
file_to_delete = dir([pname,fname]);
for j=1:length(file_to_delete),
delete([pname,file_to_delete(j).name]);
end