diff liboctave/kpse.cc @ 4412:34438519fac3

[project @ 2003-05-14 22:23:37 by jwe]
author jwe
date Wed, 14 May 2003 22:23:37 +0000
parents 6b191c6e6875
children 7b957b442818
line wrap: on
line diff
--- a/liboctave/kpse.cc
+++ b/liboctave/kpse.cc
@@ -545,7 +545,9 @@
     {
       e = b + 1;
 
-      if (e >= len)
+      if (e == len)
+	; /* OK, we have found the last element.  */
+      else if (e > len)
 	b = e = NPOS;
       else
 	{
@@ -562,6 +564,10 @@
     {
       b = e + 1;
 
+      /* Skip any consecutive colons.  */
+      while (kpse_is_env_sep (path[b]) && b < len)
+	b++;
+
       if (b >= len)
 	b = e = NPOS;
       else