* lisp/man.el (Man-softhyphen-to-minus): Avoid string-as-multibyte.
This commit is contained in:
parent
36df2f1b23
commit
dc313922d8
1 changed files with 1 additions and 4 deletions
|
@ -1174,10 +1174,7 @@ See the variable `Man-notify-method' for the different notification behaviors."
|
|||
(unless (eq t (compare-strings "latin-" 0 nil
|
||||
current-language-environment 0 6 t))
|
||||
(goto-char (point-min))
|
||||
(let ((str "\255"))
|
||||
(if enable-multibyte-characters
|
||||
(setq str (string-as-multibyte str)))
|
||||
(while (search-forward str nil t) (replace-match "-")))))
|
||||
(while (search-forward "" nil t) (replace-match "-"))))
|
||||
|
||||
(defun Man-fontify-manpage ()
|
||||
"Convert overstriking and underlining to the correct fonts.
|
||||
|
|
Loading…
Add table
Reference in a new issue