--- a/src/energize.c	Mon Aug 13 09:05:44 2007 +0200
+++ b/src/energize.c	Mon Aug 13 09:06:37 2007 +0200
@@ -722,7 +722,7 @@
 	XSETSTRING (type, XSYMBOL (type)->name);
 
       if (STRINGP (type))
-	type_string = (char *)XSTRING_DATA (type);
+	type_string = (char *) XSTRING_DATA (type);
 
       type_string = copy_string (type_string);
 
@@ -1665,9 +1665,8 @@
   if (!NILP (buffer_name))
     {
       if (modifying_p
-	  && strcmp ((char*)XSTRING_DATA (buffer_name),
-		     (char*)
-		     string_data (XSTRING (XBUFFER (binfo->emacs_buffer)->name))))
+	  && strcmp ((char*) XSTRING_DATA (buffer_name),
+		     (char*) xSTRING_DATA (XBUFFER (binfo->emacs_buffer)->name))))
 	rename_the_buffer (buffer_name);
     }
 
@@ -2135,8 +2134,7 @@
 						    BUF_BEG (current_buffer),
 						    BUF_Z (current_buffer));
       CNeedOutputSize (conn, XSTRING_LENGTH (string) + 9);
-      CWriteVstringLen (conn, XSTRING_DATA (string),
-			XSTRING_LENGTH (string));
+      CWriteVstringLen (conn, XSTRING_DATA (string), XSTRING_LENGTH (string));
     }
 
   /* write the extents */
@@ -2528,7 +2526,7 @@
 
   /* ignore the flags for now */
   execute_energize_menu (buffer, extent_to_data (extent_obj),
-			 (char*)XSTRING_DATA (v->contents [0]),
+			 (char*) XSTRING_DATA (v->contents [0]),
 			 lisp_to_word (v->contents [1]),
 			 XINT (v->contents [3]),
 			 selection,