From 4cbff657a7904b86f41bca68ea6e749f2f6b2bfc Mon Sep 17 00:00:00 2001
From: Dave Love <fx@gnu.org>
Date: Tue, 7 Dec 1999 20:01:20 +0000
Subject: [PATCH] (view-emacs-problems): New command, bound to C-h P.

---
 lisp/help.el | 7 +++++++
 1 file changed, 7 insertions(+)

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)
-- 
2.39.5