Commits

Anonymous committed 6f23e69

Autoload cperl-perldoc and cperl-perldoc-at-point; bind them by default
within cperl-mode.

  • Participants
  • Parent commits e068c67

Comments (0)

Files changed (2)

+2005-02-09  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* cperl-mode.el: Autoload cperl-perldoc, cperl-perldoc-at-point.
+	* cperl-mode.el (cperl-mode-map): 
+	  Bind them to C-cC-hp, C-cC-hP, respectively. 
+
 2004-08-13  Norbert Koch  <viteno@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.06 released.

File cperl-mode.el

 			  [(control c) (control h) v]))
     (cperl-define-key "\C-c\C-hf" 'cperl-info-on-current-command
 		      [(control c) (control h) f])
+    (cperl-define-key "\C-c\C-hp" 'cperl-perldoc
+		      [(control c) (control h) p])
+    (cperl-define-key "\C-c\C-hP" 'cperl-perldoc-at-point
+		      [(control c) (control h) P])
     (cperl-define-key "\C-c\C-hv"
 		      ;;(concat (char-to-string help-char) "v") ; does not work
 		      'cperl-get-help
 ;;; Getting help on modules in C-h f ?
 ;;; This is a modified version of `man'.
 ;;; Need to teach it how to lookup functions
+;;;###autoload
 (defun cperl-perldoc (word)
   "Run `perldoc' on WORD."
   (interactive
      (t
       (Man-getpage-in-background word)))))
 
+;;;###autoload
 (defun cperl-perldoc-at-point ()
   "Run a `perldoc' on the word around point."
   (interactive)