(describe-buffer-case-table): Set help-mode in *Help* buffer.

diff --git a/lisp/case-table.el b/lisp/case-table.el
index 8cb49493a55b004b4c0573dc354594a901531330..46f1d8b0f427d4a2b6159be70b55f42db3986270 100644 (file)
--- a/lisp/case-table.el
+++ b/lisp/case-table.el
@@ -52,7 +52,8 @@
     (save-excursion
      (with-output-to-temp-buffer "*Help*"
        (set-buffer standard-output)
-       (describe-vector vector)))))
+       (describe-vector vector)
+       (help-mode)))))
 
 ;;;###autoload
 (defun set-case-syntax-delims (l r table)