diff --git a/ChangeLog b/ChangeLog
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2012-03-28  Jude Nagurney  <jude@pwan.org>
+	* Released version 0.6.1
+	* Added aug_to_xml support
+
 2011-10-15  Jude Nagurney  <jude@pwan.org>
 	* Released version 0.5.1
 	* Fixed compilation with with err_mv_desc when using libaugeas < 0.9.0
@@ -7,7 +11,7 @@
 	* Released version 0.5.0
 	* Added aug_srun API support
 	* Added AUG_EMVDESC and AUG_ECMDRUN support for aug_errcode
-	
+
 2011-04-07  Jude Nagurney  <jude@pwan.org>
 
 	* Released version 0.4.0
diff --git a/System/Augeas.hs b/System/Augeas.hs
--- a/System/Augeas.hs
+++ b/System/Augeas.hs
@@ -888,7 +888,7 @@
 aug_to_xml aug_ptr bs_path flags  =
 #ifndef HAS_AUGEAS_TO_XML
   Prelude.error "aug_to_xml requires at least augeas version 0.10.0"
-  Prelude.error ((show aug_ptr) ++ (show fptr_out) ++ (show bs_text))  -- stop compiler warning
+  Prelude.error ((show aug_ptr) ++ (show bs_path) ++ (show flags))  -- stop compiler warning
 #else
   useAsCString bs_path $ \path -> do
     alloca $ \ptr -> do
diff --git a/System/AugeasHsc.hsc b/System/AugeasHsc.hsc
--- a/System/AugeasHsc.hsc
+++ b/System/AugeasHsc.hsc
@@ -86,14 +86,11 @@
 #endif
 }
 
+
+data AugeasXmlNode
 #ifdef HAS_AUGEAS_TO_XML
 #include <libxml/tree.h>
 #let alignment t = "%lu", (unsigned long)offsetof(struct {char x__; t (y__); }, y__)
---data xmlNode
-data AugeasXmlNode
---        deriving (Eq, Show)
-
-data AugeasXmlNodeHandle = Ptr AugeasXmlNode
 
 instance Storable AugeasXmlNode where
     alignment _ = #{alignment xmlNode}
diff --git a/augeas.cabal b/augeas.cabal
--- a/augeas.cabal
+++ b/augeas.cabal
@@ -1,5 +1,5 @@
 Name: augeas
-Version: 0.6.0
+Version: 0.6.1
 Synopsis:  A Haskell FFI wrapper for the Augeas API
 Description: A Haskell FFI wrapper for the Augeas API
 Author: Jude Nagurney