From 251f57f3f7fd73648b2672c43aa063de04923617 Mon Sep 17 00:00:00 2001 From: ichikawa Date: Tue, 27 Oct 1998 15:08:07 +0000 Subject: [PATCH] lisp/pop3-fma.el: To determin base64 encode/decode function by FLIM --- ChangeLog | 4 ++++ lisp/pop3-fma.el | 10 +++++----- 2 files changed, 9 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 3656653..eeed53f 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +1998-10-28 Tatsuya Ichikawa + + * lisp/pop3-fma.el: Determin base64 encode/decode function by FLIM. + 1998-10-26 Tatsuya Ichikawa * lisp/pop3-fma.el: Require `mel-b-el' if `mel-b' does not exist. diff --git a/lisp/pop3-fma.el b/lisp/pop3-fma.el index 77d8b15..1f09f87 100644 --- a/lisp/pop3-fma.el +++ b/lisp/pop3-fma.el @@ -80,11 +80,11 @@ (unless (and (fboundp 'pop3-fma-encode-string) (fboundp 'pop3-fma-decode-string)) - (condition-case nil - (require 'mel-b-el) - (error (require 'mel-b))) - (fset 'pop3-fma-encode-string 'base64-encode-string) - (fset 'pop3-fma-decode-string 'base64-decode-string)) + (require 'mel) + (fset 'pop3-fma-encode-string + (mel-find-function 'mime-encode-string "base64")) + (fset 'pop3-fma-decode-string + (mel-find-function 'mime-decode-string "base64"))) (defgroup pop3-fma nil "Multile POP3 account utility for Gnus." -- 1.7.10.4