X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-eform.el;h=e43e01c99fe2a22b42a93ec248fca4771c03ae48;hb=9c12c8a1215cda2d292be3989354e925ea19b143;hp=3c1ecc119170092105f2fe00d46bc940a7b1166a;hpb=b1c0004b463c693394e21226291a4ad82cecc3cb;p=gnus diff --git a/lisp/gnus-eform.el b/lisp/gnus-eform.el index 3c1ecc119..e43e01c99 100644 --- a/lisp/gnus-eform.el +++ b/lisp/gnus-eform.el @@ -1,5 +1,5 @@ ;;; gnus-eform.el --- a mode for editing forms for Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2000 +;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen @@ -115,8 +115,8 @@ of the buffer." (interactive) (goto-char (point-min)) (let ((form (condition-case nil - (read (current-buffer)) - (end-of-file nil))) + (read (current-buffer)) + (end-of-file nil))) (func gnus-edit-form-done-function)) (gnus-edit-form-exit) (funcall func form))) @@ -130,4 +130,5 @@ of the buffer." (provide 'gnus-eform) +;;; arch-tag: ef50678c-2c28-49ef-affc-e53b3b2c0bf6 ;;; gnus-eform.el ends here