From ed4479779993f28cc9b193ee75e8dc4f4b5260f5 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 13 Nov 2005 03:47:00 +0000
Subject: [PATCH] Eliminate unused procedure x_error_message.

---
 v7/src/microcode/x11base.c | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/v7/src/microcode/x11base.c b/v7/src/microcode/x11base.c
index 46650613c..8f1835652 100644
--- a/v7/src/microcode/x11base.c
+++ b/v7/src/microcode/x11base.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: x11base.c,v 1.82 2005/11/12 22:53:33 cph Exp $
+$Id: x11base.c,v 1.83 2005/11/13 03:47:00 cph Exp $
 
 Copyright 1989,1990,1991,1992,1993,1994 Massachusetts Institute of Technology
 Copyright 1995,1996,1997,1998,2000,2001 Massachusetts Institute of Technology
@@ -335,13 +335,6 @@ any_x_errors_p (Display * display)
 {
   return ((x_error_code (display)) != 0);
 }
-
-static SCHEME_OBJECT
-x_error_message (void)
-{
-  return
-    (char_pointer_to_string_no_gc ((unsigned char *) (x_error_info.message)));
-}
 
 /* Defaults and Attributes */
 
-- 
2.25.1