diff options
| author | Glenn Morris | 2016-06-06 13:04:43 -0400 |
|---|---|---|
| committer | Glenn Morris | 2016-06-06 13:04:43 -0400 |
| commit | eeb138d314ecb799eb16959c1367da27699a9ad0 (patch) | |
| tree | 2513a5ee94b0e7a88c5eeadcb2b186d1c4ab70ba | |
| parent | c0462e120d064cb5943b31a9c8dfec1c62712a9f (diff) | |
| download | emacs-eeb138d314ecb799eb16959c1367da27699a9ad0.tar.gz emacs-eeb138d314ecb799eb16959c1367da27699a9ad0.zip | |
* lisp/man.el (Man-reference-regexp, Man-default-man-entry):
Handle U+2010 hyphen at eol, as used when LANG=en_US.utf8.
| -rw-r--r-- | lisp/man.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/man.el b/lisp/man.el index 0410626c655..d127decfebd 100644 --- a/lisp/man.el +++ b/lisp/man.el | |||
| @@ -308,7 +308,7 @@ This regular expression should start with a `^' character.") | |||
| 308 | 308 | ||
| 309 | (defvar Man-reference-regexp | 309 | (defvar Man-reference-regexp |
| 310 | (concat "\\(" Man-name-regexp | 310 | (concat "\\(" Man-name-regexp |
| 311 | "\\(\n[ \t]+" Man-name-regexp "\\)*\\)[ \t]*(\\(" | 311 | "\\(‐?\n[ \t]+" Man-name-regexp "\\)*\\)[ \t]*(\\(" |
| 312 | Man-section-regexp "\\))") | 312 | Man-section-regexp "\\))") |
| 313 | "Regular expression describing a reference to another manpage.") | 313 | "Regular expression describing a reference to another manpage.") |
| 314 | 314 | ||
| @@ -779,7 +779,7 @@ POS defaults to `point'." | |||
| 779 | ;; see this- | 779 | ;; see this- |
| 780 | ;; command-here(1) | 780 | ;; command-here(1) |
| 781 | ;; Note: This code gets executed iff our entry is after POS. | 781 | ;; Note: This code gets executed iff our entry is after POS. |
| 782 | (when (looking-at "[ \t\r\n]+\\([-a-zA-Z0-9._+:]+\\)([0-9])") | 782 | (when (looking-at "‐?[ \t\r\n]+\\([-a-zA-Z0-9._+:]+\\)([0-9])") |
| 783 | (setq word (concat word (match-string-no-properties 1))) | 783 | (setq word (concat word (match-string-no-properties 1))) |
| 784 | ;; Make sure the section number gets included by the code below. | 784 | ;; Make sure the section number gets included by the code below. |
| 785 | (goto-char (match-end 1))) | 785 | (goto-char (match-end 1))) |