comparison lisp/descr-text.el @ 90188:01137c1fdbe9

Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-57 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 324-352) - Merge from gnus--rel--5.10 - Update from CVS - etc/emacs-buffer.gdb: Remove RCS keywords * gnus--rel--5.10 (patch 70-79) - Update from CVS - Merge from emacs--cvs-trunk--0
author Miles Bader <miles@gnu.org>
date Mon, 06 Jun 2005 02:39:45 +0000
parents a01e7a9f1659 49a7c3d3d8d9
children f9a65d7ebd29
comparison
equal deleted inserted replaced
90187:587ea1490d70 90188:01137c1fdbe9
59 (setq major-mode 'describe-text-mode 59 (setq major-mode 'describe-text-mode
60 mode-name "Describe-Text") 60 mode-name "Describe-Text")
61 (use-local-map describe-text-mode-map) 61 (use-local-map describe-text-mode-map)
62 (widget-setup) 62 (widget-setup)
63 (add-hook 'change-major-mode-hook 'font-lock-defontify nil t) 63 (add-hook 'change-major-mode-hook 'font-lock-defontify nil t)
64 (run-hooks 'describe-text-mode-hook)) 64 (run-mode-hooks 'describe-text-mode-hook))
65 65
66 ;;; Describe-Text Utilities. 66 ;;; Describe-Text Utilities.
67 67
68 (defun describe-text-widget (widget) 68 (defun describe-text-widget (widget)
69 "Insert text to describe WIDGET in the current buffer." 69 "Insert text to describe WIDGET in the current buffer."