Mercurial > hg > octave-lyh

diff scripts/strings/strcmpi.m @ 5443:ec8c33dcd1bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-09-08 01:40:57 by jwe]
author jwe
date Thu, 08 Sep 2005 01:40:58 +0000
parents 4c8a2e4e0717
children 86adc85cc471
line wrap: on
line diff
--- a/scripts/strings/strcmpi.m
+++ b/scripts/strings/strcmpi.m
@@ -33,7 +33,7 @@
 function status = strcmpi(s1, s2)
 
   if (nargin == 2)
-    status = (isstr (s1) && isstr(s2) && strcmp (upper (s1), upper (s2)));
+    status = (ischar (s1) && ischar(s2) && strcmp (upper (s1), upper (s2)));
   else
     usage ("strcmpi (s, t)");
   endif