;;;
;;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;; Version:
-;;; $Id: emu-xemacs.el,v 7.2 1996/04/11 01:05:58 morioka Exp $
+;;; $Id: emu-xemacs.el,v 7.4 1996/04/24 11:58:31 morioka Exp $
;;; Keywords: emulation, compatibility, XEmacs
;;;
;;; This file is part of tl (Tiny Library).
"Convert list of character CHAR-LIST to string. [emu-xemacs.el]"
`(mapconcat #'char-to-string ,char-list ""))
+(if running-xemacs-20
+ (defun string-to-int-list (str)
+ (mapcar #'char-int str)
+ )
+ (fset 'string-to-int-list 'string-to-char-list)
+ )
+
;;; @ end
;;;