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);