From 1bee79252a5b73b405fd3bcaa384f749c1f1b931 Mon Sep 17 00:00:00 2001 From: tomo Date: Thu, 14 Dec 2000 06:19:51 +0000 Subject: [PATCH] Don't require `poem'. (std11-parse-ascii-token): Don't use `find-non-ascii-charset-string'. --- std11.el | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/std11.el b/std11.el index 786518f..dbfd2c9 100644 --- a/std11.el +++ b/std11.el @@ -1,8 +1,8 @@ ;;; std11.el --- STD 11 functions for GNU Emacs -;; Copyright (C) 1995,1996,1997,1998,1999 Free Software Foundation, Inc. +;; Copyright (C) 1995,1996,1997,1998,1999,2000 Free Software Foundation, Inc. -;; Author: MORIOKA Tomohiko +;; Author: MORIOKA Tomohiko ;; Keywords: mail, news, RFC 822, STD 11 ;; This file is part of FLIM (Faithful Library about Internet Message). @@ -25,7 +25,6 @@ ;;; Code: (require 'poe) -(require 'poem) ; find-non-ascii-charset-string (require 'custom) ; std11-lexical-analyzer @@ -435,8 +434,7 @@ be the result." (setq token (car lal)) (or (std11-ignored-token-p token) (if (and (setq token-value (cdr token)) - (find-non-ascii-charset-string token-value) - ) + (delq 'ascii (find-charset-string token-value))) (setq token nil) ))) (setq lal (cdr lal)) -- 1.7.10.4