From b1376368e2a5e612c53b9a9de24d8c228af89b88 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 7 Jun 2000 12:00:23 +0000 Subject: [PATCH] (fill-find-break-point): Check the validity of charset. --- lisp/textmodes/fill.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 6463c3b82c7..9e5df39fcb0 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -315,7 +315,9 @@ If the charset has no such property, do nothing." (if (eq charset 'ascii) (setq ch (preceding-char) charset (char-charset ch))) - (setq func (get-charset-property charset 'fill-find-break-point-function)) + (if (charsetp charset) + (setq func + (get-charset-property charset 'fill-find-break-point-function))) (if (and func (fboundp func)) (funcall func limit)))) -- 2.39.2