From 8b57240871f592ebec63b151eda6a9dc8ccb6961 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 3 Mar 1997 17:27:53 +0000 Subject: [PATCH] Require emu; function `find-non-ascii-charset-string' and `find-non-ascii-charset-region' were abolished. --- eword-encode.el | 15 +++------------ 1 file changed, 3 insertions(+), 12 deletions(-) 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 -;; 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)) -- 1.7.10.4