2001-07-17 22:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
authorShengHuo ZHU <zsh@cs.rochester.edu>
Wed, 18 Jul 2001 17:56:35 +0000 (17:56 +0000)
committerShengHuo ZHU <zsh@cs.rochester.edu>
Wed, 18 Jul 2001 17:56:35 +0000 (17:56 +0000)
* gnus-group.el (gnus-group-select-group): Doc fix.

* gnus-eform.el (gnus-edit-form-done): Return nil if end-of-file.

lisp/ChangeLog
lisp/gnus-eform.el
lisp/gnus-group.el
lisp/gnus-topic.el

index 01d2ace..05792a4 100644 (file)
@@ -1,3 +1,9 @@
+2001-07-17 22:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * gnus-group.el (gnus-group-select-group): Doc fix.
+
+       * gnus-eform.el (gnus-edit-form-done): Return nil if end-of-file.
+
 2001-07-17  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * dgnushack.el (dgnushack-make-auto-load): Advise `make-autoload'
index 9fe7242..3c1ecc1 100644 (file)
@@ -114,7 +114,9 @@ of the buffer."
   "Update changes and kill the current buffer."
   (interactive)
   (goto-char (point-min))
-  (let ((form (read (current-buffer)))
+  (let ((form (condition-case nil
+                  (read (current-buffer))
+                (end-of-file nil)))
        (func gnus-edit-form-done-function))
     (gnus-edit-form-exit)
     (funcall func form)))
index 1c44e11..9cda30a 100644 (file)
@@ -1772,6 +1772,7 @@ group."
 (defun gnus-group-select-group (&optional all)
   "Select this newsgroup.
 No article is selected automatically.
+If the group is opened, just switch the summary buffer.
 If ALL is non-nil, already read articles become readable.
 If ALL is a number, fetch this number of articles."
   (interactive "P")
index 396fc77..b5eba3c 100644 (file)
@@ -1121,6 +1121,7 @@ articles in the topic and its subtopics."
 (defun gnus-topic-select-group (&optional all)
   "Select this newsgroup.
 No article is selected automatically.
+If the group is opened, just switch the summary buffer.
 If ALL is non-nil, already read articles become readable.
 If ALL is a number, fetch this number of articles.