From cb581be7b155b38d9dd7736bfbf052f3ee631839 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 9 Jun 2000 00:42:39 +0000 Subject: [PATCH] (Man-fontify-manpage): Pay attention to overstrike pattern for CJK characters (X^H^HX). --- lisp/man.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/man.el b/lisp/man.el index 45fd98ab91..7993d38433 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -693,7 +693,7 @@ Same for the ANSI bold and normal escape sequences." (backward-delete-char 2) (put-text-property (1- (point)) (point) 'face Man-underline-face)) (goto-char (point-min)) - (while (re-search-forward "\\(.\\)\\(\b\\1\\)+" nil t) + (while (re-search-forward "\\(.\\)\\(\b+\\1\\)+" nil t) (replace-match "\\1") (put-text-property (1- (point)) (point) 'face Man-overstrike-face)) (goto-char (point-min)) -- 2.20.1