[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-eform.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-eform.el,v |
Date: |
Sun, 28 Oct 2007 09:19:33 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 07/10/28 09:18:40
Index: lisp/gnus/gnus-eform.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/gnus-eform.el,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -b -r1.11 -r1.12
--- lisp/gnus/gnus-eform.el 26 Jul 2007 05:26:57 -0000 1.11
+++ lisp/gnus/gnus-eform.el 28 Oct 2007 09:18:34 -0000 1.12
@@ -86,13 +86,14 @@
(make-local-variable 'gnus-prev-winconf)
(gnus-run-mode-hooks 'gnus-edit-form-mode-hook))
-(defun gnus-edit-form (form documentation exit-func)
+(defun gnus-edit-form (form documentation exit-func &optional layout)
"Edit FORM in a new buffer.
Call EXIT-FUNC on exit. Display DOCUMENTATION in the beginning
-of the buffer."
+of the buffer.
+The optional LAYOUT overrides the `edit-form' window layout."
(let ((winconf (current-window-configuration)))
(set-buffer (gnus-get-buffer-create gnus-edit-form-buffer))
- (gnus-configure-windows 'edit-form)
+ (gnus-configure-windows (or layout 'edit-form))
(gnus-edit-form-mode)
(setq gnus-prev-winconf winconf)
(setq gnus-edit-form-done-function exit-func)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/gnus/gnus-eform.el,v,
Miles Bader <=