minor doorganize() addition

This is a minor addition to Pat's doorganize() patch.

This just allows you to press '?' in the midst of an #adjust command
to see what letters are already in use. It is a PICK_NONE menu for
viewing only, because your actual response to the #adjust must not
be limited to the letters already used. It helps to be able to see
what's already consumed without having to terminate the command,
inventory, then start it again.

diff --git a/src/invent.c b/src/invent.c
index 0b1974d81e02e1fb49ca1b9f4ba70be438d31d06..f9452b40ad379d744e529369160ab2514f1a16c4 100644 (file)
--- a/src/invent.c
+++ b/src/invent.c
@@ -18,6 +18,7 @@ STATIC_DCL boolean FDECL(putting_on, (const char *));
 STATIC_PTR int FDECL(ckunpaid,(struct obj *));
 STATIC_PTR int FDECL(ckvalidcat,(struct obj *));
 STATIC_DCL char FDECL(display_pickinv, (const char *,BOOLEAN_P, long *));
+STATIC_DCL char FDECL(display_used_invlets, (CHAR_P));
 STATIC_DCL boolean FDECL(this_type_only, (struct obj *));
 STATIC_DCL void NDECL(dounpaid);
 STATIC_DCL struct obj *FDECL(find_unpaid,(struct obj *,struct obj **));
@@ -1791,6 +1792,59 @@ boolean want_reply;
        return display_pickinv(lets, want_reply, (long *)0);
 }
 
+/*
+ * Show what is current using inventory letters. 
+ *
+ */
+STATIC_OVL char
+display_used_invlets(avoidlet)
+char avoidlet;
+{
+       struct obj *otmp;
+       char ilet, ret = 0;
+       char *invlet = flags.inv_order;
+       int n, classcount, done = 0;
+       winid win;
+       anything any;
+       menu_item *selected;
+
+       if (invent) {
+           win = create_nhwindow(NHW_MENU);
+           start_menu(win);
+           while (!done) {
+               any.a_void = 0;         /* set all bits to zero */
+               classcount = 0;
+               for(otmp = invent; otmp; otmp = otmp->nobj) {
+                   ilet = otmp->invlet;
+                   if (ilet == avoidlet) continue;
+                   if (!flags.sortpack || otmp->oclass == *invlet) {
+                       if (flags.sortpack && !classcount) {
+                               any.a_void = 0;         /* zero */
+                               add_menu(win, NO_GLYPH, &any, 0, 0, iflags.menu_headings,
+                                   let_to_name(*invlet, FALSE), MENU_UNSELECTED);
+                               classcount++;
+                       }
+                       any.a_char = ilet;
+                       add_menu(win, obj_to_glyph(otmp),
+                               &any, ilet, 0, ATR_NONE, doname(otmp),
+                               MENU_UNSELECTED);
+                   }
+               }
+               if (flags.sortpack && *++invlet) continue;
+               done = 1;
+           }
+           end_menu(win, "Inventory letters used:");
+
+           n = select_menu(win, PICK_NONE, &selected);
+           if (n > 0) {
+               ret = selected[0].item.a_char;
+               free((genericptr_t)selected);
+           } else
+               ret = !n ? '\0' : '\033';       /* cancelled */
+       }
+       return ret;
+}
+
 /*
  * Returns the number of unpaid items within the given list.  This includes
  * contained objects.
@@ -2700,9 +2754,19 @@ doorganize()     /* inventory organizer by Del Lamb */
        if(cur > 5) compactify(buf);
 
        /* get 'to' slot to use as destination */
-       Sprintf(qbuf, "Adjust letter to what [%s]?", buf);
+       Sprintf(qbuf, "Adjust letter to what [%s]%s?", buf,
+               invent ? " (? see used letters)" : "");
        for (;;) {
            let = yn_function(qbuf, (char *)0, '\0');
+           if(let == '?' || let == '*') {
+               char ilet = display_used_invlets(splitting ? obj->invlet : 0);
+               if(!ilet) continue;
+               if(ilet == '\033') {
+                       pline(Never_mind);
+                       return 0;
+               }
+               let = ilet;
+           }
            if (index(quitchars, let) ||
                    /* adjusting to same slot is meaningful since all
                       compatible stacks get collected along the way,