From 1d8e9a7c5da2f20a7b99a8b7d1d7b5e840baf688 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 13 Dec 2001 14:42:27 +0000 Subject: [PATCH] (set-auto-coding): Don't search for "unibyte:" or "coding:" if set-auto-mode-1 returns nil. --- lisp/ChangeLog | 5 +++++ lisp/international/mule.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 70e5fa83c4d..2e29f8405d1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-12-13 Eli Zaretskii + + * international/mule.el (set-auto-coding): Don't search for + "unibyte:" or "coding:" if set-auto-mode-1 returns nil. + 2001-12-13 Pavel Jan,Bm(Bk * mail/mailabbrev.el (mail-abbrevs-setup): Do not use make-local-hook. diff --git a/lisp/international/mule.el b/lisp/international/mule.el index f8468f999c8..124761c0d2a 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1388,7 +1388,7 @@ function by default." (goto-char head-start) (setq head-end (set-auto-mode-1)) (setq head-start (point)) - (when (< head-found head-end) + (when (and head-end (< head-found head-end)) (goto-char head-start) (when (and set-auto-coding-for-load (re-search-forward -- 2.39.5