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)

diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 1aa79817916c370b83f60b7a6fc0663eaa80ff75..d5c404c7d2f0e57d87a66d3fdb7782d4c280ac7c 100644 (file)
--- 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