From 5f749dd0f8007b4d6b3a10e1ec3c9bab28eb9caf Mon Sep 17 00:00:00 2001
From: Harry Moffat <hkmoffa@sandia.gov>
Date: Thu, 21 Aug 2003 17:39:33 +0000
Subject: [PATCH] find_XML is no longer in the Cantera kernel API. this fixes
 the problem, replacing it with calls to get_XML_Node().

---
 Cantera/fortran/src/.cvsignore | 1 +
 Cantera/fortran/src/fct.cpp    | 9 ++++++++-
 2 files changed, 9 insertions(+), 1 deletion(-)
 create mode 100644 Cantera/fortran/src/.cvsignore

diff --git a/Cantera/fortran/src/.cvsignore b/Cantera/fortran/src/.cvsignore
new file mode 100644
index 000000000..f3c7a7c5d
--- /dev/null
+++ b/Cantera/fortran/src/.cvsignore
@@ -0,0 +1 @@
+Makefile
diff --git a/Cantera/fortran/src/fct.cpp b/Cantera/fortran/src/fct.cpp
index 93076f7c3..827da187a 100644
--- a/Cantera/fortran/src/fct.cpp
+++ b/Cantera/fortran/src/fct.cpp
@@ -727,7 +727,14 @@ extern "C" {
         Kinetics& kin = *k;
         XML_Node *x, *r=0;
         if (root) r = &root->root();
-        x = find_XML(f2string(src, lensrc), r, f2string(id,lenid), "", "phase");
+	string srcS = f2string(src, lensrc);
+	string idS  = f2string(id, lenid);
+	if (srcS != "") {
+           x = get_XML_Node(srcS, r);
+	} else {
+           x = get_XML_Node(idS, r);
+	}
+        // x = find_XML(f2string(src, lensrc), r, f2string(id,lenid), "", "phase");
         if (!x) return false;
         importPhase(*x, t);
         kin.addPhase(*t);