Mercurial > hg > octave-lyh

diff scripts/general/isdir.m @ 6861:32558239ed9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-09-05 06:15:01 by jwe]
author jwe
date Wed, 05 Sep 2007 06:15:01 +0000
parents 27c966e4b2dc
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/general/isdir.m
+++ b/scripts/general/isdir.m
@@ -24,7 +24,8 @@
 
 function t = isdir (x)
   if (nargin == 1)
-    t = exist (x, "dir");
+    ## Exist returns an integer but isdir should return a logical.
+    t = exist (x, "dir") == 7;
   else
     print_usage ("isdir");
   endif