diff lisp/help-mode.el @ 109412:9557b86a556a

Merge from mainline.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Sun, 20 Jun 2010 22:46:22 +0000
parents 858e3e43cfd5
children 280c8ae2476d
line wrap: on
line diff
--- a/lisp/help-mode.el	Thu Jun 17 22:50:31 2010 +0000
+++ b/lisp/help-mode.el	Sun Jun 20 22:46:22 2010 +0000
@@ -244,6 +244,16 @@
 		       (message "Unable to find location in file"))))
   'help-echo (purecopy "mouse-2, RET: find face's definition"))
 
+(define-button-type 'help-package
+  :supertype 'help-xref
+  'help-function 'describe-package
+  'help-echo (purecopy "mouse-2, RET: Describe package"))
+
+(define-button-type 'help-package-def
+  :supertype 'help-xref
+  'help-function (lambda (file) (dired file))
+  'help-echo (purecopy "mouse-2, RET: visit package directory"))
+
 
 ;;;###autoload
 (defun help-mode ()