From 30d46e2f041319d890eb6b44a82e250e5efe0c63 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Fri, 15 May 1998 10:22:32 +0000
Subject: [PATCH] (looking-at-as-unibyte): New function.

---
 emu-e20_2.el |    6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/emu-e20_2.el b/emu-e20_2.el
index ca33328..3a64188 100644
--- a/emu-e20_2.el
+++ b/emu-e20_2.el
@@ -68,6 +68,12 @@ but the contents viewed as characters do change."
 
 (defalias 'string-to-int-list 'string-to-char-list)
 
+(defun looking-at-as-unibyte (regexp)
+  "Like `looking-at', but string is regarded as unibyte sequence."
+  (let (enable-multibyte-characters)
+    (looking-at regexp)
+    ))
+
 ;;; @@ obsoleted aliases
 ;;;
 ;;; You should not use them.
-- 
1.7.10.4