emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master dc31392: * lisp/man.el (Man-softhyphen-to-minus): A


From: Stefan Monnier
Subject: [Emacs-diffs] master dc31392: * lisp/man.el (Man-softhyphen-to-minus): Avoid string-as-multibyte.
Date: Wed, 30 Aug 2017 15:01:06 -0400 (EDT)

branch: master
commit dc313922d826b9f53cf1426ff36c8cc3f71d64c6
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * lisp/man.el (Man-softhyphen-to-minus): Avoid string-as-multibyte.
---
 lisp/man.el | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/lisp/man.el b/lisp/man.el
index c7d8c40..4a14f63 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -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.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]