Mercurial > octave-nkf
diff src/dirfns.cc @ 5639:acbcb9f164ca
[project @ 2006-03-03 16:39:34 by jwe]
author | jwe |
---|---|
date | Fri, 03 Mar 2006 16:39:35 +0000 |
parents | c90441793b1b |
children | 426719471ac6 |
line wrap: on
line diff
--- a/src/dirfns.cc Fri Mar 03 05:22:39 2006 +0000 +++ b/src/dirfns.cc Fri Mar 03 16:39:35 2006 +0000 @@ -373,9 +373,15 @@ std::string fulldir = file_ops::tilde_expand (dirname); - int status = (nargin == 1) - ? file_ops::rmdir (fulldir, msg) - : file_ops::recursive_rmdir (fulldir, msg); + if (nargin == 2) + { + if (args(1).string_value () == "s") + status = file_ops::recursive_rmdir (fulldir, msg); + else + error ("rmdir: expecting second argument to be \"s\""); + } + else + status = file_ops::rmdir (fulldir, msg) if (status < 0) {