emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] Changes to emacs/lisp/man.el,v


From: Glenn Morris
Subject: [Emacs-diffs] Changes to emacs/lisp/man.el,v
Date: Thu, 13 Sep 2007 07:58:54 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       07/09/13 07:58:54

Index: man.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/man.el,v
retrieving revision 1.170
retrieving revision 1.171
diff -u -b -r1.170 -r1.171
--- man.el      13 Aug 2007 13:41:01 -0000      1.170
+++ man.el      13 Sep 2007 07:58:54 -0000      1.171
@@ -652,7 +652,13 @@
       (skip-chars-backward "-a-zA-Z0-9._+:")
       (let ((start (point)))
        (skip-chars-forward "-a-zA-Z0-9._+:")
-       (setq word (buffer-substring-no-properties start (point))))
+        ;; If there is a continuation at the end of line, check the
+        ;; following line too, eg:
+        ;;     see this-
+        ;;     command-here(1)
+        (setq word (buffer-substring-no-properties start (point)))
+        (if (looking-at "[ \t\r\n]+\\([-a-zA-Z0-9._+:]+\\)([0-9])")
+            (setq word (concat word (match-string 1)))))
       (if (string-match "[._]+$" word)
          (setq word (substring word 0 (match-beginning 0))))
       ;; If looking at something like *strcat(... , remove the '*'




reply via email to

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