Changeset 565 for CMT/HEAD/source/cmt_install_area.cxx

Timestamp:

Apr 13, 2011, 1:28:08 PM (13 years ago)

Author:

rybkin

Message:

See C.L. 448

File:

• CMT/HEAD/source/cmt_install_area.cxx (modified) (1 diff)

CMT/HEAD/source/cmt_install_area.cxx

@@ -197 +197 @@
   cmt_string installarea;
 
-  const cmt_string pwd = CmtSystem::pwd ();
-
-  installarea = Project::find_in_cmt_paths (pwd);
+  const Use& use = Use::current ();
+  cmt_string current_path (use.real_path);
+  if (!use.located ())
+    {
+      CmtMessage::verbose ("build_current_installarea: Current use not located");
+      current_path = CmtSystem::pwd ();
+    }
+  //const cmt_string pwd = CmtSystem::pwd ();
+
+  installarea = Project::find_in_cmt_paths (current_path);
+  //installarea = Project::find_in_cmt_paths (pwd);
 
   return (installarea);