Mercurial > fem-fenics-eugenio

comparison inst/ufl.m @ 224:a108a0bfe201

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Ensure that ufl opens a file with .ufl extension * inst/ufl.m: force lower case extension
author Eugenio Gianniti <eugenio.gianniti@mail.polimi.it>
date Thu, 22 May 2014 11:43:44 +0200
parents 8b159045242f
children 72af6354bf02
comparison
equal deleted inserted replaced
223:8b159045242f 224:a108a0bfe201
42 else 42 else
43 if (numel (varargin) > 1) 43 if (numel (varargin) > 1)
44 filename = varargin{2}; 44 filename = varargin{2};
45 if (isempty (regexpi (filename, ".ufl$", "match"))) 45 if (isempty (regexpi (filename, ".ufl$", "match")))
46 filename = [filename, ".ufl"]; 46 filename = [filename, ".ufl"];
47 else
48 filename = [filename(1:end-4), ".ufl"];
47 endif 49 endif
48 endif 50 endif
49 [~, err, ~] = stat (filename); 51 [~, err, ~] = stat (filename);
50 if (err == 0) 52 if (err == 0)
51 error (["ufl: a file named ", filename, " already exists"]); 53 error (["ufl: a file named ", filename, " already exists"]);