From 3e067088ec5b15a936f697be93a229519fdf1332 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 28 Dec 1999 07:13:58 +0000 Subject: [PATCH] (mime-edit-user-agent-value): Use `error' instead of `file-error' for the handler of `condition-case' because XEmacs does not signal an error named `file-error' if the required feature is not provided. --- ChangeLog | 13 ++++++++++--- mime-edit.el | 2 +- 2 files changed, 11 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index a5d69ef..607177c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,8 +1,15 @@ +1999-12-28 Katsumi Yamaoka + + * mime-edit.el (mime-edit-user-agent-value): Use `error' instead of + `file-error' for the handler of `condition-case' because XEmacs + does not signal an error named `file-error' if the required feature + is not provided. + 1999-12-14 Akihiro Arisawa - * mime-view.el (mime-preview-follow-current-entity): Fetch - field of `mime-view-following-required-fields-list' from parent entity - if it is not exist in current entity. + * mime-view.el (mime-preview-follow-current-entity): Fetch field of + `mime-view-following-required-fields-list' from parent entity if it + is not exist in current entity. 1999-12-13 Katsumi Yamaoka diff --git a/mime-edit.el b/mime-edit.el index c49d605..3eb5b08 100644 --- a/mime-edit.el +++ b/mime-edit.el @@ -650,7 +650,7 @@ If it is not specified for a major-mode, (progn (require 'apel-ver) (concat (apel-version) " ")) - (file-error nil)) + (error nil)) (if (featurep 'xemacs) (concat (cond ((featurep 'utf-2000) (concat "UTF-2000-MULE/" utf-2000-version)) -- 1.7.10.4