[Emacs-diffs] master 70225ec: Fix looking up functions like "-e" in cperl-mode

[Eli Zaretskii]

branch: master
commit 70225ecae1fc3069a59384f2ff3576bbba4e1037
Author: Stefan Kangas <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    Fix looking up functions like "-e" in cperl-mode
    
    * lisp/progmodes/cperl-mode.el (cperl-perldoc): Handle functions with
    leading dash (e.g. "-f"). (Bug#6013)
---
 lisp/progmodes/cperl-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 1aa7981..d5c404c 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -8382,7 +8382,7 @@ the appropriate statement modifier."
   (require 'man)
   (let* ((case-fold-search nil)
         (is-func (and
-                  (string-match "^[a-z]+$" word)
+                  (string-match "^\\(-[A-Za-z]\\|[a-z]+\\)$" word)
                   (string-match (concat "^" word "\\>")
                                 (documentation-property
                                  'cperl-short-docs