X-Git-Url: https://git.distorted.org.uk/u/mdw/putty/blobdiff_plain/9e201f72db4478da43d1b042639e2f294db08239..dcfd072859faf68a06c2836a478d3771fb518c2a:/config.c

diff --git a/config.c b/config.c
index 0a470803..39da6c2a 100644
--- a/config.c
+++ b/config.c
@@ -350,9 +350,25 @@ static void sessionsaver_handler(union control *ctrl, void *dlg,
 	    dlg_update_done(ctrl, dlg);
 	}
     } else if (event == EVENT_VALCHANGE) {
+        int top, bottom, halfway, i;
 	if (ctrl == ssd->editbox) {
 	    dlg_editbox_get(ctrl, dlg, savedsession,
 			    SAVEDSESSION_LEN);
+	    top = ssd->sesslist.nsessions;
+	    bottom = -1;
+	    while (top-bottom > 1) {
+	        halfway = (top+bottom)/2;
+	        i = strcmp(savedsession, ssd->sesslist.sessions[halfway]);
+	        if (i <= 0 ) {
+		    top = halfway;
+	        } else {
+		    bottom = halfway;
+	        }
+	    }
+	    if (top == ssd->sesslist.nsessions) {
+	        top -= 1;
+	    }
+	    dlg_listbox_select(ssd->listbox, dlg, top);
 	}
     } else if (event == EVENT_ACTION) {
 	if (!ssd->midsession &&