emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master eeb138d: * lisp/man.el (Man-reference-regexp, Man-d


From: Glenn Morris
Subject: [Emacs-diffs] master eeb138d: * lisp/man.el (Man-reference-regexp, Man-default-man-entry):
Date: Mon, 6 Jun 2016 17:04:56 +0000 (UTC)

branch: master
commit eeb138d314ecb799eb16959c1367da27699a9ad0
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    * lisp/man.el (Man-reference-regexp, Man-default-man-entry):
    Handle U+2010 hyphen at eol, as used when LANG=en_US.utf8.
---
 lisp/man.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/man.el b/lisp/man.el
index 0410626..d127dec 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -308,7 +308,7 @@ This regular expression should start with a `^' character.")
 
 (defvar Man-reference-regexp
   (concat "\\(" Man-name-regexp
-         "\\(\n[ \t]+" Man-name-regexp "\\)*\\)[ \t]*(\\("
+         "\\(‐?\n[ \t]+" Man-name-regexp "\\)*\\)[ \t]*(\\("
          Man-section-regexp "\\))")
   "Regular expression describing a reference to another manpage.")
 
@@ -779,7 +779,7 @@ POS defaults to `point'."
       ;;     see this-
       ;;     command-here(1)
       ;; Note: This code gets executed iff our entry is after POS.
-      (when (looking-at "[ \t\r\n]+\\([-a-zA-Z0-9._+:]+\\)([0-9])")
+      (when (looking-at "‐?[ \t\r\n]+\\([-a-zA-Z0-9._+:]+\\)([0-9])")
        (setq word (concat word (match-string-no-properties 1)))
        ;; Make sure the section number gets included by the code below.
        (goto-char (match-end 1)))



reply via email to

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