Index: lisp/gnus-score.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-score.el,v
retrieving revision 7.22
diff -u -r7.22 gnus-score.el
--- lisp/gnus-score.el	5 Jul 2005 22:34:48 -0000	7.22
+++ lisp/gnus-score.el	14 Jul 2005 14:26:09 -0000
@@ -1104,7 +1104,11 @@
   "Edit the all.SCORE file."
   (interactive)
   (find-file (gnus-score-file-name "all"))
-  (gnus-score-mode))
+  (gnus-score-mode)
+  (setq gnus-score-edit-exit-function 'gnus-score-edit-done)
+  (gnus-message
+   4 (substitute-command-keys
+      "\\<gnus-score-mode-map>\\[gnus-score-edit-exit] to save edits")))
 
 (defun gnus-score-edit-file (file)
   "Edit a score file."