# HG changeset patch
# User jwe
# Date 1025320460 0
# Node ID 15a0aa0b6c18614ae33a810382da92f0d3e599e8
# Parent  c5cf860b756d4526b873bd31c79ce9a4e34bbca9
[project @ 2002-06-29 03:14:20 by jwe]

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2002-06-28  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* defaults.cc (loadpath): Warn if loadpath doesn't contain
+	leading, trailing, or doubled colon.
+
 	* pt-decl.cc (tree_static_command::eval, tree_global_command::eval):
 	Call error for any non-zero value of error_state.
 	* pt-select.cc (tree_if_command::eval): Likewise.
diff --git a/src/defaults.cc b/src/defaults.cc
--- a/src/defaults.cc
+++ b/src/defaults.cc
@@ -415,6 +415,10 @@
     }
   else
     {
+      if (! (s[0] == ':' || s[s.length () - 1] == ':'
+	     || s.find ("::") != NPOS))
+	warning ("LOADPATH will ignore default load path");
+
       Vload_path = s;
 
       Vload_path_dir_path = dir_path (Vload_path, Vdefault_load_path);