-(defun charset-leading-byte (charset)
- "Return the leading byte of CHARSET.
-See `make-charset'."
- (charset-property charset 'leading-byte))
+(defun charset-bytes (charset)
+ "Useless in XEmacs, returns 1."
+ 1)
+
+(define-obsolete-function-alias 'charset-columns 'charset-width) ;; 19990409
+(define-obsolete-function-alias 'charset-final 'charset-iso-final-char) ;; 19990409
+(define-obsolete-function-alias 'charset-graphic 'charset-iso-graphic-plane) ;; 19990409
+(define-obsolete-function-alias 'charset-doc-string 'charset-description) ;; 19990409