Select first unseen message when invoking M-x imail on a folder that

is already online.

diff --git a/v7/src/imail/imail-top.scm b/v7/src/imail/imail-top.scm
index a291c5a29cc43490ca27576f21a7552e86e8bdb2..eee25cbc809ac2178c46ebd29f1a5a4a45864cf2 100644 (file)
--- a/v7/src/imail/imail-top.scm
+++ b/v7/src/imail/imail-top.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: imail-top.scm,v 1.265 2001/06/04 17:42:30 cph Exp $
+;;; $Id: imail-top.scm,v 1.266 2001/06/04 19:25:09 cph Exp $
 ;;;
 ;;; Copyright (c) 1999-2001 Massachusetts Institute of Technology
 ;;;
@@ -240,7 +240,10 @@ regardless of the folder type."
            (begin
              (select-buffer buffer)
              (if (eq? (folder-connection-status folder) 'OFFLINE)
-                 ((ref-command imail-get-new-mail) #f)))
+                 ((ref-command imail-get-new-mail) #f)
+                 (let ((message (first-unseen-message folder)))
+                   (if message
+                       (select-message folder message #t)))))
            (begin
              (let ((buffer
                     (new-buffer

diff --git a/v7/src/imail/todo.txt b/v7/src/imail/todo.txt
index 1b5a7cd7fcaf28fd6b40f967ce56222f76cc85fc..ee0c564b185951470ff4fe7303c0cbbbca49a653 100644 (file)
--- a/v7/src/imail/todo.txt
+++ b/v7/src/imail/todo.txt
@@ -1,5 +1,5 @@
 IMAIL To-Do List
-$Id: todo.txt,v 1.129 2001/06/04 17:40:38 cph Exp $
+$Id: todo.txt,v 1.130 2001/06/04 19:25:11 cph Exp $
 
 Bug fixes
 ---------
@@ -7,15 +7,9 @@ Bug fixes
 * When browser pops up a window of URLs that it is operating on, the
   strings shown should be relative to the container being browsed.
 
-* M-x imail should select the next unseen message when choosing an
-  existing buffer.
-
-* Various changes to Dired that might affect our browsers: RET selects
-  the current object (preferred to f).  D command does immediate
-  delete.  t command means toggle sense of marked lines (*t also does
-  this, perhaps is preferable).  Name of command bound to x is now
-  dired-do-flagged-delete.  S and H do links.  P prints file.  ^ runs
-  dired on parent directory of this directory.
+* Various changes to Dired that might affect our browsers: t command
+  means toggle sense of marked lines (*t also does this, perhaps is
+  preferable).  S and H do links.  P prints file.
 
 * The PROBE-FOLDER thread is left running even when connection to
   server is severed.  In fact it is running as long as the buffer is