(view-emacs-problems): New command, bound to C-h P.

1 files changed, 7 insertions, 0 deletions

diff --git a/lisp/help.el b/lisp/help.el
index 387c4cdd730..875723f154a 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -83,6 +83,8 @@
 (autoload 'finder-by-keyword "finder"
   "Find packages matching a given keyword." t)
 
+(define-key help-map "P" 'view-emacs-problems)
+
 (define-key help-map "s" 'describe-syntax)
 
 (define-key help-map "t" 'help-with-tutorial)
@@ -461,6 +463,11 @@ With numeric argument display information on correspondingly older changes."
 ;;;  (find-file-read-only (expand-file-name "FAQ" data-directory))
   (info "(emacs-faq)"))
 
+(defun view-emacs-problems ()
+  "Display info on known problems with Emacs and possible workarounds."
+  (interactive)
+  (view-file (expand-file-name "PROBLEMS" data-directory)))
+
 (defun view-lossage ()
   "Display last 100 input keystrokes."
   (interactive)