1 |
;;; gnus-eform.el --- a mode for editing forms for Gnus |
;;; gnus-eform.el --- a mode for editing forms for Gnus |
2 |
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2004 |
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2004, 2005 |
3 |
;; Free Software Foundation, Inc. |
;; Free Software Foundation, Inc. |
4 |
|
|
5 |
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> |
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> |
83 |
(use-local-map gnus-edit-form-mode-map) |
(use-local-map gnus-edit-form-mode-map) |
84 |
(make-local-variable 'gnus-edit-form-done-function) |
(make-local-variable 'gnus-edit-form-done-function) |
85 |
(make-local-variable 'gnus-prev-winconf) |
(make-local-variable 'gnus-prev-winconf) |
86 |
(gnus-run-hooks 'gnus-edit-form-mode-hook)) |
(gnus-run-mode-hooks 'gnus-edit-form-mode-hook)) |
87 |
|
|
88 |
(defun gnus-edit-form (form documentation exit-func) |
(defun gnus-edit-form (form documentation exit-func) |
89 |
"Edit FORM in a new buffer. |
"Edit FORM in a new buffer. |