--- a/lisp/mule/mule-charset.el	Mon Aug 13 10:57:07 2007 +0200
+++ b/lisp/mule/mule-charset.el	Mon Aug 13 10:57:55 2007 +0200
@@ -116,6 +116,12 @@
 be automatically determined)."
   (charset-property charset 'columns))
 
+(defun charset-width (charset)
+  "Return the number of display columns per character of CHARSET.
+This only applies to TTY mode (under X, the actual display width can
+be automatically determined)."
+  (charset-property charset 'columns))
+
 (defun charset-direction (charset)
   "Return the display direction (`l2r' or `r2l') of CHARSET."
   (charset-property charset 'direction))
@@ -131,6 +137,10 @@
 See `make-charset'."
   (charset-property charset 'ccl-program))
 
+(defun charset-bytes (charset)
+  "Useless in XEmacs, returns 1."
+   1)
+
 ;;;; Define setf methods for all settable Charset properties
 
 (defsetf charset-registry    set-charset-registry)