From d47156cb3d75b34c2ad798eae78e525f963d66f6 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Sun, 25 Oct 1998 18:41:05 +0000
Subject: [PATCH] (char-octet): fixed.

---
 poem.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/poem.el b/poem.el
index 63f670f..443b576 100644
--- a/poem.el
+++ b/poem.el
@@ -78,8 +78,8 @@ If STRING is multibyte, the result is STRING itself.
   "Return the octet numbered N (should be 0 or 1) of char CH.
 N defaults to 0 if omitted. [XEmacs-mule emulating function]"
   (or (nth (if n
-	       1
-	     (1+ n))
+	       (1+ n)
+	     1)
 	   (split-char ch))
       0))
 
-- 
1.7.10.4