(characterp): New alias.

diff --git a/poem-e20_3.el b/poem-e20_3.el
index 48faf69..df9af37 100644 (file)
--- a/poem-e20_3.el
+++ b/poem-e20_3.el
@@ -40,6 +40,8 @@
   "Return index of character succeeding CHAR whose index is INDEX."
   `(1+ ,index))
 
+(defalias-maybe 'characterp 'char-valid-p)
+
 
 ;;; @ string
 ;;;