;ELC   
;;; compiled by amu@mit.edu on Sat Sep 13 16:19:10 1997
;;; from file /afs/sipb.mit.edu/contrib/emacs/packages/gnus-5.4.67/lisp/gnus-eform.el
;;; emacs version 19.30.1.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`gnus-eform.el' was compiled for Emacs 19.29 or later"))


(byte-code "ÀÁ!ˆÀÂ!ˆÃÄÅÆÁ%ˆÈÉÅÊÄÌ&ˆÈÍÅÎÄÌ&ˆÏÐ!„4 ÅÐBÏÒ!„C ÓÒBÏÔ!„R ÅÔB„h Õ!×ÔØ\"ˆÅ‡" [require gnus gnus-win custom-declare-group gnus-edit-form nil "A mode for editing forms." :group custom-declare-variable gnus-edit-form-mode-hook "Hook run in `gnus-edit-form-mode' buffers." :type hook gnus-edit-form-menu-hook "Hook run when creating menus in `gnus-edit-form-mode' buffers." boundp gnus-edit-form-done-function current-load-list gnus-edit-form-buffer "*Gnus edit form*" gnus-edit-form-mode-map copy-keymap emacs-lisp-mode-map gnus-define-keys-1 ("" gnus-edit-form-done "" gnus-edit-form-exit)] 8)
(defalias 'gnus-edit-form-make-menu-bar #[nil "ÀÁ!?…$ ÀÁ!„ ÂÁBÄÁÅÆ#ˆÇÁÆÉ$ˆÊË!‡" [boundp gnus-edit-form-menu nil current-load-list put variable-documentation "" easy-menu-do-define gnus-edit-form-mode-map ("Edit Form" ["Exit and save changes" gnus-edit-form-done t] ["Exit" gnus-edit-form-exit t]) run-hooks gnus-edit-form-menu-hook] 5])
#@102 Major mode for editing forms.
It is a slightly enhanced emacs-lisp-mode.

\{gnus-edit-form-mode-map}
(defalias 'gnus-edit-form-mode #[nil "ÀÁÂ\"ƒ\n Ã ˆÄ ˆÅÇÉ\n!ˆËÌ!ˆËÍ!ˆÎÏ!‡" [gnus-visual-p group-menu menu gnus-edit-form-make-menu-bar kill-all-local-variables gnus-edit-form-mode major-mode "Edit Form" mode-name use-local-map gnus-edit-form-mode-map make-local-variable gnus-edit-form-done-function gnus-prev-winconf run-hooks gnus-edit-form-mode-hook] 3 (#$ . 1482) nil])
#@107 Edit FORM in a new buffer.
Call EXIT-FUNC on exit.  Display DOCUMENTATION in the beginning
of the buffer.
(defalias 'gnus-edit-form #[(form documentation exit-func) "À Â!qˆÄÅ!ˆÆ ˆÇ ˆ		\nË ˆ\fcˆn„' Ícˆebˆm„7 ÎcˆÏyˆ‚* ÐcˆÍcˆ`Òp\"ˆÍcˆb*‡" [current-window-configuration winconf get-buffer-create gnus-edit-form-buffer gnus-configure-windows edit-form gnus-add-current-to-buffer-list gnus-edit-form-mode gnus-prev-winconf exit-func gnus-edit-form-done-function erase-buffer documentation "\n" ";;; " 1 ";; Type `C-c C-c' after you've finished editing.\n" p pp form] 3 (#$ . 1968)])
#@45 Update changes and kill the current buffer.
(defalias 'gnus-edit-form-done #[nil "ebˆÀp!	Ä ˆ\n!*‡" [read gnus-edit-form-done-function func form gnus-edit-form-exit] 2 (#$ . 2564) nil])
#@26 Kill the current buffer.
(defalias 'gnus-edit-form-exit #[nil "Âp!ˆÃ	!)‡" [gnus-prev-winconf winconf kill-buffer set-window-configuration] 2 (#$ . 2758) nil])
(provide (quote gnus-eform))