Mercurial > hg > octave-lyh

diff scripts/strings/strncmpi.m @ 6250:ff5e6cf72bda

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-01-23 18:37:52 by jwe]
author jwe
date Tue, 23 Jan 2007 18:37:52 +0000
parents 34f96dd5441b
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/strings/strncmpi.m
+++ b/scripts/strings/strncmpi.m
@@ -39,7 +39,7 @@
   if (nargin == 3)
     ## Note that we don't use tolower here because we need to be able to
     ## handle cell arrays of strings.
-    retval = strcmp (lower (strtrunc (s1, n)), lower (strtrunc (s2, n)));
+    retval = strncmp (lower (s1), lower (s2), n);
   else
     print_usage ();
   endif