From: morioka <morioka>
Date: Mon, 3 Mar 1997 17:27:53 +0000 (+0000)
Subject: Require emu; function `find-non-ascii-charset-string' and
X-Git-Tag: Hokutetsu-Ishikawa-new~206
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8b57240871f592ebec63b151eda6a9dc8ccb6961;p=elisp%2Fsemi.git

Require emu; function `find-non-ascii-charset-string' and
`find-non-ascii-charset-region' were abolished.
---

diff --git a/eword-encode.el b/eword-encode.el
index 222d409..717bd07 100644
--- a/eword-encode.el
+++ b/eword-encode.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Revision: 0.12 $
+;; Version: $Revision: 0.13 $
 ;; Keywords: encoded-word, MIME, multilingual, header, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -25,27 +25,18 @@
 
 ;;; Code:
 
+(require 'emu)
 (require 'mel)
 (require 'std11)
 (require 'mime-def)
 (require 'cl)
 
-(defsubst find-non-ascii-charset-string (string)
-  "Return a list of charsets in the STRING except ascii."
-  (delq 'ascii (find-charset-string string))
-  )
-
-(defsubst find-non-ascii-charset-region (start end)
-  "Return a list of charsets except ascii in the region between START and END."
-  (delq 'ascii (find-charset-string (buffer-substring start end)))
-  )
-
 
 ;;; @ version
 ;;;
 
 (defconst eword-encode-RCS-ID
-  "$Id: eword-encode.el,v 0.12 1997-03-01 04:09:16 tmorioka Exp $")
+  "$Id: eword-encode.el,v 0.13 1997-03-03 17:27:53 morioka Exp $")
 (defconst eword-encode-version (get-version-string eword-encode-RCS-ID))