Adding upstream version 0.5.1upstream/0.5.1

1 files changed, 2073 insertions, 0 deletions

diff --git a/menu.c b/menu.c
new file mode 100644
index 0000000..a17c490
--- /dev/null
+++ b/menu.c
@@ -0,0 +1,2073 @@
+/* $Id: menu.c,v 1.41 2004/03/23 16:44:02 ukai Exp $ */
+/* 
+ * w3m menu.c
+ */
+#include <stdio.h>
+
+#include "fm.h"
+#include "menu.h"
+#include "func.h"
+#include "myctype.h"
+#include "regex.h"
+
+#ifdef USE_MOUSE
+#ifdef USE_GPM
+#include <gpm.h>
+static int gpm_process_menu_mouse(Gpm_Event * event, void *data);
+extern int gpm_process_mouse(Gpm_Event *, void *);
+#endif				/* USE_GPM */
+#ifdef USE_SYSMOUSE
+extern int (*sysm_handler) (int x, int y, int nbs, int obs);
+static int sysm_process_menu_mouse(int, int, int, int);
+extern int sysm_process_mouse(int, int, int, int);
+#endif				/* USE_SYSMOUSE */
+#if defined(USE_GPM) || defined(USE_SYSMOUSE)
+#define X_MOUSE_SELECTED (char)0xff
+static int X_Mouse_Selection;
+extern int do_getch();
+#define getch()	do_getch()
+#endif				/* defined(USE_GPM) || defined(USE_SYSMOUSE) */
+#endif				/* USE_MOUSE */
+
+#ifdef USE_MENU
+
+static char **FRAME;
+static int FRAME_WIDTH;
+static int graph_mode = FALSE;
+#define G_start  {if (graph_mode) graphstart();}
+#define G_end    {if (graph_mode) graphend();}
+
+static int mEsc(char c);
+static int mEscB(char c);
+static int mEscD(char c);
+static int mNull(char c);
+static int mSelect(char c);
+static int mDown(char c);
+static int mUp(char c);
+static int mLast(char c);
+static int mTop(char c);
+static int mNext(char c);
+static int mPrev(char c);
+static int mFore(char c);
+static int mBack(char c);
+static int mLineU(char c);
+static int mLineD(char c);
+static int mOk(char c);
+static int mCancel(char c);
+static int mClose(char c);
+static int mSusp(char c);
+static int mMouse(char c);
+static int mSrchF(char c);
+static int mSrchB(char c);
+static int mSrchN(char c);
+static int mSrchP(char c);
+#ifdef __EMX__
+static int mPc(char c);
+#endif
+
+/* *INDENT-OFF* */
+static int (*MenuKeymap[128]) (char c) = {
+/*  C-@     C-a     C-b     C-c     C-d     C-e     C-f     C-g      */
+#ifdef __EMX__
+    mPc,    mTop,   mPrev,  mClose, mNull,  mLast,  mNext,  mNull,
+#else
+    mNull,  mTop,   mPrev,  mClose, mNull,  mLast,  mNext,  mNull,
+#endif
+/*  C-h     C-i     C-j     C-k     C-l     C-m     C-n     C-o      */
+    mCancel,mNull,  mOk,    mNull,  mNull,  mOk,    mDown,  mNull,
+/*  C-p     C-q     C-r     C-s     C-t     C-u     C-v     C-w      */
+    mUp,    mNull,  mSrchB, mSrchF, mNull,  mNull,  mNext,  mNull,
+/*  C-x     C-y     C-z     C-[     C-\     C-]     C-^     C-_      */
+    mNull,  mNull,  mSusp,  mEsc,   mNull,  mNull,  mNull,  mNull,
+/*  SPC     !       "       #       $       %       &       '        */
+    mOk,    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  (       )       *       +       ,       -       .       /        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mSrchF,
+/*  0       1       2       3       4       5       6       7        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull , mNull,  mNull,
+/*  8       9       :       ;       <       =       >       ?        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mSrchB,
+/*  @       A       B       C       D       E       F       G        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  H       I       J       K       L       M       N       O        */
+    mNull,  mNull,  mLineU, mLineD, mNull,  mNull,  mSrchP, mNull,
+/*  P       Q       R       S       T       U       V       W        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  X       Y       Z       [       \       ]       ^       _        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  `       a       b       c       d       e       f       g        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  h       i       j       k       l       m       n       o        */
+    mCancel,mNull,  mDown,  mUp,    mOk,    mNull,  mSrchN, mNull,
+/*  p       q       r       s       t       u       v       w        */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  x       y       z       {       |       }       ~       DEL      */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mCancel,
+};
+static int (*MenuEscKeymap[128]) (char c) = {
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  O     */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mEscB,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  [                                     */
+    mNull,  mNull,  mNull,  mEscB,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  v             */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mPrev,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+};
+static int (*MenuEscBKeymap[128]) (char c) = {
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  A       B       C       D       E                     */
+    mNull,  mUp,    mDown,  mOk,    mCancel,mClose, mNull, mNull,
+/*  L       M                     */
+    mNull,  mNull,  mNull,  mNull,  mClose, mMouse, mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+};
+static int (*MenuEscDKeymap[128]) (char c) = {
+/*  0       1       INS     3       4       PgUp,   PgDn    7     */
+    mNull,  mNull,  mClose, mNull,  mNull,  mBack,  mFore,  mNull,
+/*  8       9       10      F1      F2      F3      F4      F5       */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  16      F6      F7      F8      F9      F10     22      23       */
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+/*  24      25      26      27      HELP    29      30      31       */
+    mNull,  mNull,  mNull,  mNull,  mClose, mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+    mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+};
+
+#ifdef __EMX__
+static int (*MenuPcKeymap[256])(char c)={
+//			  Null
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+//							  S-Tab
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-q	  A-w	  A-E	  A-r	  A-t	  A-y	  A-u	  A-i
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-o	  A-p	  A-[	  A-]			  A-a	  A-s
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-d	  A-f	  A-g	  A-h	  A-j	  A-k	  A-l	  A-;
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-'    A-'		  A-\		  A-x	  A-c	  A-v
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mPrev,
+// A-b	  A-n	  A-m	  A-,	  A-.	  A-/		  A-+
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+//			  F1	  F2	  F3	  F4	  F5
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// F6	  F7	  F8	  F9	  F10			  Home
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mTop,
+// Up	  PgUp	  A-/	  Left	  5	  Right	  C-*	  End
+  mUp,	  mUp,	  mNull,  mCancel,mNull,  mOk,	  mNull,  mLast,
+// Down	  PgDn	  Ins	  Del	  S-F1	  S-F2	  S-F3	  S-F4
+  mDown,  mDown,  mClose, mCancel,mNull,  mNull,  mNull,  mNull,
+// S-F5	  S-F6	  S-F7	  S-F8	  S-F9	  S-F10	  C-F1	  C-F2
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// C-F3	  C-F4	  C-F5	  C-F6	  C-F7	  C-F8	  C-F9	  C-F10
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-F1	  A-F2	  A-F3	  A-F4	  A-F5	  A-F6	  A-F7	  A-F8
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-F9	  A-F10	  PrtSc	  C-Left  C-Right C-End	  C-PgDn  C-Home
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-1	  A-2	  A-3	  A-4	  A-5	  A-6	  A-7/8	  A-9
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// A-0	  A -	  A-=		  C-PgUp  F11	  F12	  S-F11
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// S-F12  C-F11	  C-F12	  A-F11	  A-F12	  C-Up	  C-/	  C-5
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+// S-*	  C-Down  C-Ins	  C-Del	  C-Tab	  C -	  C-+
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,
+//				  A -	  A-Tab	  A-Enter
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 160
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 168
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 176
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 184
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 192
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 200
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 208
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 216
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 224
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 232
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,   // 240
+  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull,  mNull	   // 248
+};
+#endif
+/* *INDENT-ON* */
+/* --- SelectMenu --- */
+
+static Menu SelectMenu;
+static int SelectV = 0;
+static void initSelectMenu(void);
+static void smChBuf(void);
+static int smDelBuf(char c);
+
+/* --- SelectMenu (END) --- */
+
+/* --- SelTabMenu --- */
+
+static Menu SelTabMenu;
+static int SelTabV = 0;
+static void initSelTabMenu(void);
+static void smChTab(void);
+static int smDelTab(char c);
+
+/* --- SelTabMenu (END) --- */
+
+/* --- MainMenu --- */
+
+static Menu MainMenu;
+#ifdef USE_M17N
+/* FIXME: gettextize here */
+static wc_ces MainMenuCharset = WC_CES_US_ASCII;	/* FIXME: charset of source code */
+static int MainMenuEncode = FALSE;
+#endif
+
+static MenuItem MainMenuItem[] = {
+    /* type        label           variable value func     popup keys data  */
+    {MENU_FUNC, N_(" Back         (b) "), NULL, 0, backBf, NULL, "b", NULL},
+    {MENU_POPUP, N_(" Select Buffer(s) "), NULL, 0, NULL, &SelectMenu, "s",
+     NULL},
+    {MENU_POPUP, N_(" Select Tab   (t) "), NULL, 0, NULL, &SelTabMenu, "tT",
+     NULL},
+    {MENU_FUNC, N_(" View Source  (v) "), NULL, 0, vwSrc, NULL, "vV", NULL},
+    {MENU_FUNC, N_(" Edit Source  (e) "), NULL, 0, editBf, NULL, "eE", NULL},
+    {MENU_FUNC, N_(" Save Source  (S) "), NULL, 0, svSrc, NULL, "S", NULL},
+    {MENU_FUNC, N_(" Reload       (r) "), NULL, 0, reload, NULL, "rR", NULL},
+    {MENU_NOP, N_(" ---------------- "), NULL, 0, nulcmd, NULL, "", NULL},
+    {MENU_FUNC, N_(" Go Link      (a) "), NULL, 0, followA, NULL, "a", NULL},
+    {MENU_FUNC, N_("   on New Tab (n) "), NULL, 0, tabA, NULL, "nN", NULL},
+    {MENU_FUNC, N_(" Save Link    (A) "), NULL, 0, svA, NULL, "A", NULL},
+    {MENU_FUNC, N_(" View Image   (i) "), NULL, 0, followI, NULL, "i", NULL},
+    {MENU_FUNC, N_(" Save Image   (I) "), NULL, 0, svI, NULL, "I", NULL},
+    {MENU_FUNC, N_(" View Frame   (f) "), NULL, 0, rFrame, NULL, "fF", NULL},
+    {MENU_NOP, N_(" ---------------- "), NULL, 0, nulcmd, NULL, "", NULL},
+    {MENU_FUNC, N_(" Bookmark     (B) "), NULL, 0, ldBmark, NULL, "B", NULL},
+    {MENU_FUNC, N_(" Help         (h) "), NULL, 0, ldhelp, NULL, "hH", NULL},
+    {MENU_FUNC, N_(" Option       (o) "), NULL, 0, ldOpt, NULL, "oO", NULL},
+    {MENU_NOP, N_(" ---------------- "), NULL, 0, nulcmd, NULL, "", NULL},
+    {MENU_FUNC, N_(" Quit         (q) "), NULL, 0, qquitfm, NULL, "qQ", NULL},
+    {MENU_END, "", NULL, 0, nulcmd, NULL, "", NULL},
+};
+
+/* --- MainMenu (END) --- */
+
+static MenuList *w3mMenuList;
+
+static Menu *CurrentMenu = NULL;
+
+#define mvaddch(y, x, c)        (move(y, x), addch(c))
+#define mvaddstr(y, x, str)     (move(y, x), addstr(str))
+#define mvaddnstr(y, x, str, n) (move(y, x), addnstr_sup(str, n))
+
+void
+new_menu(Menu *menu, MenuItem *item)
+{
+    int i, l;
+    char *p;
+
+    menu->cursorX = 0;
+    menu->cursorY = 0;
+    menu->x = 0;
+    menu->y = 0;
+    menu->nitem = 0;
+    menu->item = item;
+    menu->initial = 0;
+    menu->select = 0;
+    menu->offset = 0;
+    menu->active = 0;
+
+    if (item == NULL)
+	return;
+
+    for (i = 0; item[i].type != MENU_END; i++) ;
+    menu->nitem = i;
+    menu->height = menu->nitem;
+    for (i = 0; i < 128; i++)
+	menu->keymap[i] = MenuKeymap[i];
+    menu->width = 0;
+    for (i = 0; i < menu->nitem; i++) {
+	if ((p = item[i].keys) != NULL) {
+	    while (*p) {
+		if (IS_ASCII(*p)) {
+		    menu->keymap[(int)*p] = mSelect;
+		    menu->keyselect[(int)*p] = i;
+		}
+		p++;
+	    }
+	}
+	l = get_strwidth(item[i].label);
+	if (l > menu->width)
+	    menu->width = l;
+    }
+}
+
+void
+geom_menu(Menu *menu, int x, int y, int mselect)
+{
+    int win_x, win_y, win_w, win_h;
+
+    menu->select = mselect;
+
+    if (menu->width % FRAME_WIDTH)
+	menu->width = (menu->width / FRAME_WIDTH + 1) * FRAME_WIDTH;
+    win_x = menu->x - FRAME_WIDTH;
+    win_w = menu->width + 2 * FRAME_WIDTH;
+    if (win_x + win_w > COLS)
+	win_x = COLS - win_w;
+    if (win_x < 0) {
+	win_x = 0;
+	if (win_w > COLS) {
+	    menu->width = COLS - 2 * FRAME_WIDTH;
+	    menu->width -= menu->width % FRAME_WIDTH;
+	    win_w = menu->width + 2 * FRAME_WIDTH;
+	}
+    }
+    menu->x = win_x + FRAME_WIDTH;
+
+    win_y = menu->y - mselect - 1;
+    win_h = menu->height + 2;
+    if (win_y + win_h > LASTLINE)
+	win_y = LASTLINE - win_h;
+    if (win_y < 0) {
+	win_y = 0;
+	if (win_y + win_h > LASTLINE) {
+	    win_h = LASTLINE - win_y;
+	    menu->height = win_h - 2;
+	    if (menu->height <= mselect)
+		menu->offset = mselect - menu->height + 1;
+	}
+    }
+    menu->y = win_y + 1;
+}
+
+void
+draw_all_menu(Menu *menu)
+{
+    if (menu->parent != NULL)
+	draw_all_menu(menu->parent);
+    draw_menu(menu);
+}
+
+void
+draw_menu(Menu *menu)
+{
+    int x, y, w;
+    int i, j;
+
+    x = menu->x - FRAME_WIDTH;
+    w = menu->width + 2 * FRAME_WIDTH;
+    y = menu->y - 1;
+
+    if (menu->offset == 0) {
+	G_start;
+	mvaddstr(y, x, FRAME[3]);
+	for (i = FRAME_WIDTH; i < w - FRAME_WIDTH; i += FRAME_WIDTH)
+	    mvaddstr(y, x + i, FRAME[10]);
+	mvaddstr(y, x + i, FRAME[6]);
+	G_end;
+    }
+    else {
+	G_start;
+	mvaddstr(y, x, FRAME[5]);
+	G_end;
+	for (i = FRAME_WIDTH; i < w - FRAME_WIDTH; i++)
+	    mvaddstr(y, x + i, " ");
+	G_start;
+	mvaddstr(y, x + i, FRAME[5]);
+	G_end;
+	i = (w / 2 - 1) / FRAME_WIDTH * FRAME_WIDTH;
+	mvaddstr(y, x + i, ":");
+    }
+
+    for (j = 0; j < menu->height; j++) {
+	y++;
+	G_start;
+	mvaddstr(y, x, FRAME[5]);
+	G_end;
+	draw_menu_item(menu, menu->offset + j);
+	G_start;
+	mvaddstr(y, x + w - FRAME_WIDTH, FRAME[5]);
+	G_end;
+    }
+    y++;
+    if (menu->offset + menu->height == menu->nitem) {
+	G_start;
+	mvaddstr(y, x, FRAME[9]);
+	for (i = FRAME_WIDTH; i < w - FRAME_WIDTH; i += FRAME_WIDTH)
+	    mvaddstr(y, x + i, FRAME[10]);
+	mvaddstr(y, x + i, FRAME[12]);
+	G_end;
+    }
+    else {
+	G_start;
+	mvaddstr(y, x, FRAME[5]);
+	G_end;
+	for (i = FRAME_WIDTH; i < w - FRAME_WIDTH; i++)
+	    mvaddstr(y, x + i, " ");
+	G_start;
+	mvaddstr(y, x + i, FRAME[5]);
+	G_end;
+	i = (w / 2 - 1) / FRAME_WIDTH * FRAME_WIDTH;
+	mvaddstr(y, x + i, ":");
+    }
+}
+
+void
+draw_menu_item(Menu *menu, int mselect)
+{
+    mvaddnstr(menu->y + mselect - menu->offset, menu->x,
+	      menu->item[mselect].label, menu->width);
+}
+
+int
+select_menu(Menu *menu, int mselect)
+{
+    if (mselect < 0 || mselect >= menu->nitem)
+	return (MENU_NOTHING);
+    if (mselect < menu->offset)
+	up_menu(menu, menu->offset - mselect);
+    else if (mselect >= menu->offset + menu->height)
+	down_menu(menu, mselect - menu->offset - menu->height + 1);
+
+    if (menu->select >= menu->offset &&
+	menu->select < menu->offset + menu->height)
+	draw_menu_item(menu, menu->select);
+    menu->select = mselect;
+    standout();
+    draw_menu_item(menu, menu->select);
+    standend();
+    /* 
+     * move(menu->cursorY, menu->cursorX); */
+    move(menu->y + mselect - menu->offset, menu->x);
+    toggle_stand();
+    refresh();
+
+    return (menu->select);
+}
+
+void
+goto_menu(Menu *menu, int mselect, int down)
+{
+    int select_in;
+    if (mselect >= menu->nitem)
+	mselect = menu->nitem - 1;
+    else if (mselect < 0)
+	mselect = 0;
+    select_in = mselect;
+    while (menu->item[mselect].type == MENU_NOP) {
+	if (down > 0) {
+	    if (++mselect >= menu->nitem) {
+		down_menu(menu, select_in - menu->select);
+		mselect = menu->select;
+		break;
+	    }
+	}
+	else if (down < 0) {
+	    if (--mselect < 0) {
+		up_menu(menu, menu->select - select_in);
+		mselect = menu->select;
+		break;
+	    }
+	}
+	else {
+	    return;
+	}
+    }
+    select_menu(menu, mselect);
+}
+
+void
+up_menu(Menu *menu, int n)
+{
+    if (n < 0 || menu->offset == 0)
+	return;
+    menu->offset -= n;
+    if (menu->offset < 0)
+	menu->offset = 0;
+
+    draw_menu(menu);
+}
+
+void
+down_menu(Menu *menu, int n)
+{
+    if (n < 0 || menu->offset + menu->height == menu->nitem)
+	return;
+    menu->offset += n;
+    if (menu->offset + menu->height > menu->nitem)
+	menu->offset = menu->nitem - menu->height;
+
+    draw_menu(menu);
+}
+
+int
+action_menu(Menu *menu)
+{
+    char c;
+    int mselect;
+    MenuItem item;
+
+    if (menu->active == 0) {
+	if (menu->parent != NULL)
+	    menu->parent->active = 0;
+	return (0);
+    }
+    draw_all_menu(menu);
+    select_menu(menu, menu->select);
+
+    while (1) {
+#ifdef USE_MOUSE
+	if (use_mouse)
+	    mouse_active();
+#endif				/* USE_MOUSE */
+	c = getch();
+#ifdef USE_MOUSE
+	if (use_mouse)
+	    mouse_inactive();
+#if defined(USE_GPM) || defined(USE_SYSMOUSE)
+	if (c == X_MOUSE_SELECTED) {
+	    mselect = X_Mouse_Selection;
+	    if (mselect != MENU_NOTHING)
+		break;
+	}
+#endif				/* defined(USE_GPM) || defined(USE_SYSMOUSE) */
+#endif				/* USE_MOUSE */
+	if (IS_ASCII(c)) {	/* Ascii */
+	    mselect = (*menu->keymap[(int)c]) (c);
+	    if (mselect != MENU_NOTHING)
+		break;
+	}
+    }
+    if (mselect >= 0 && mselect < menu->nitem) {
+	item = menu->item[mselect];
+	if (item.type & MENU_POPUP) {
+	    popup_menu(menu, item.popup);
+	    return (1);
+	}
+	if (menu->parent != NULL)
+	    menu->parent->active = 0;
+	if (item.type & MENU_VALUE)
+	    *item.variable = item.value;
+	if (item.type & MENU_FUNC) {
+	    CurrentKey = -1;
+	    CurrentKeyData = NULL;
+	    CurrentCmdData = item.data;
+	    (*item.func) ();
+	    CurrentCmdData = NULL;
+	}
+    }
+    else if (mselect == MENU_CLOSE) {
+	if (menu->parent != NULL)
+	    menu->parent->active = 0;
+    }
+    return (0);
+}
+
+void
+popup_menu(Menu *parent, Menu *menu)
+{
+    int active = 1;
+
+    if (menu->item == NULL || menu->nitem == 0)
+	return;
+    if (menu->active)
+	return;
+
+#ifdef USE_MOUSE
+#ifdef USE_GPM
+    gpm_handler = gpm_process_menu_mouse;
+#endif				/* USE_GPM */
+#ifdef USE_SYSMOUSE
+    sysm_handler = sysm_process_menu_mouse;
+#endif				/* USE_SYSMOUSE */
+#endif				/* USE_MOUSE */
+    menu->parent = parent;
+    menu->select = menu->initial;
+    menu->offset = 0;
+    menu->active = 1;
+    if (parent != NULL) {
+	menu->cursorX = parent->cursorX;
+	menu->cursorY = parent->cursorY;
+	guess_menu_xy(parent, menu->width, &menu->x, &menu->y);
+    }
+    geom_menu(menu, menu->x, menu->y, menu->select);
+
+    CurrentMenu = menu;
+    while (active) {
+	active = action_menu(CurrentMenu);
+	displayBuffer(Currentbuf, B_FORCE_REDRAW);
+    }
+    menu->active = 0;
+    CurrentMenu = parent;
+#ifdef USE_MOUSE
+#ifdef USE_GPM
+    if (CurrentMenu == NULL)
+	gpm_handler = gpm_process_mouse;
+#endif				/* USE_GPM */
+#ifdef USE_SYSMOUSE
+    if (CurrentMenu == NULL)
+	sysm_handler = sysm_process_mouse;
+#endif				/* USE_SYSMOUSE */
+#endif				/* USE_MOUSE */
+}
+
+void
+guess_menu_xy(Menu *parent, int width, int *x, int *y)
+{
+    *x = parent->x + parent->width + FRAME_WIDTH - 1;
+    if (*x + width + FRAME_WIDTH > COLS) {
+	*x = COLS - width - FRAME_WIDTH;
+	if ((parent->x + parent->width / 2 > *x) &&
+	    (parent->x + parent->width / 2 > COLS / 2))
+	    *x = parent->x - width - FRAME_WIDTH + 1;
+    }
+    *y = parent->y + parent->select - parent->offset;
+}
+
+void
+new_option_menu(Menu *menu, char **label, int *variable, void (*func) ())
+{
+    int i, nitem;
+    char **p;
+    MenuItem *item;
+
+    if (label == NULL || *label == NULL)
+	return;
+
+    for (i = 0, p = label; *p != NULL; i++, p++) ;
+    nitem = i;
+
+    item = New_N(MenuItem, nitem + 1);
+
+    for (i = 0, p = label; i < nitem; i++, p++) {
+	if (func != NULL)
+	    item[i].type = MENU_VALUE | MENU_FUNC;
+	else
+	    item[i].type = MENU_VALUE;
+	item[i].label = *p;
+	item[i].variable = variable;
+	item[i].value = i;
+	item[i].func = func;
+	item[i].popup = NULL;
+	item[i].keys = "";
+    }
+    item[nitem].type = MENU_END;
+
+    new_menu(menu, item);
+}
+
+static void
+set_menu_frame(void)
+{
+    if (graph_ok()) {
+	graph_mode = TRUE;
+	FRAME_WIDTH = 1;
+	FRAME = graph_symbol;
+    }
+    else {
+	graph_mode = FALSE;
+#ifdef USE_M17N
+	FRAME_WIDTH = 0;
+	FRAME = get_symbol(DisplayCharset, &FRAME_WIDTH);
+	if (!WcOption.use_wide)
+	    FRAME_WIDTH = 1;
+#else
+	FRAME_WIDTH = 1;
+	FRAME = get_symbol();
+#endif
+    }
+}
+
+/* --- MenuFunctions --- */
+
+#ifdef __EMX__
+static int
+mPc(char c)
+{
+    c = getch();
+    return (MenuPcKeymap[(int)c] (c));
+}
+#endif
+
+static int
+mEsc(char c)
+{
+    c = getch();
+    return (MenuEscKeymap[(int)c] (c));
+}
+
+static int
+mEscB(char c)
+{
+    c = getch();
+    if (IS_DIGIT(c))
+	return (mEscD(c));
+    else
+	return (MenuEscBKeymap[(int)c] (c));
+}
+
+static int
+mEscD(char c)
+{
+    int d;
+
+    d = (int)c - (int)'0';
+    c = getch();
+    if (IS_DIGIT(c)) {
+	d = d * 10 + (int)c - (int)'0';
+	c = getch();
+    }
+    if (c == '~')
+	return (MenuEscDKeymap[d] (c));
+    else
+	return (MENU_NOTHING);
+}
+
+static int
+mNull(char c)
+{
+    return (MENU_NOTHING);
+}
+
+static int
+mSelect(char c)
+{
+    if (IS_ASCII(c))
+	return (select_menu(CurrentMenu, CurrentMenu->keyselect[(int)c]));
+    else
+	return (MENU_NOTHING);
+}
+
+static int
+mDown(char c)
+{
+    if (CurrentMenu->select >= CurrentMenu->nitem - 1)
+	return (MENU_NOTHING);
+    goto_menu(CurrentMenu, CurrentMenu->select + 1, 1);
+    return (MENU_NOTHING);
+}
+
+static int
+mUp(char c)
+{
+    if (CurrentMenu->select <= 0)
+	return (MENU_NOTHING);
+    goto_menu(CurrentMenu, CurrentMenu->select - 1, -1);
+    return (MENU_NOTHING);
+}
+
+static int
+mLast(char c)
+{
+    goto_menu(CurrentMenu, CurrentMenu->nitem - 1, -1);
+    return (MENU_NOTHING);
+}
+
+static int
+mTop(char c)
+{
+    goto_menu(CurrentMenu, 0, 1);
+    return (MENU_NOTHING);
+}
+
+static int
+mNext(char c)
+{
+    int mselect = CurrentMenu->select + CurrentMenu->height;
+
+    if (mselect >= CurrentMenu->nitem)
+	return mLast(c);
+    down_menu(CurrentMenu, CurrentMenu->height);
+    goto_menu(CurrentMenu, mselect, -1);
+    return (MENU_NOTHING);
+}
+
+static int
+mPrev(char c)
+{
+    int mselect = CurrentMenu->select - CurrentMenu->height;
+
+    if (mselect < 0)
+	return mTop(c);
+    up_menu(CurrentMenu, CurrentMenu->height);
+    goto_menu(CurrentMenu, mselect, 1);
+    return (MENU_NOTHING);
+}
+
+static int
+mFore(char c)
+{
+    if (CurrentMenu->select >= CurrentMenu->nitem - 1)
+	return (MENU_NOTHING);
+    goto_menu(CurrentMenu, (CurrentMenu->select + CurrentMenu->height - 1),
+	      (CurrentMenu->height + 1));
+    return (MENU_NOTHING);
+}
+
+static int
+mBack(char c)
+{
+    if (CurrentMenu->select <= 0)
+	return (MENU_NOTHING);
+    goto_menu(CurrentMenu, (CurrentMenu->select - CurrentMenu->height + 1),
+	      (-1 - CurrentMenu->height));
+    return (MENU_NOTHING);
+}
+
+static int
+mLineU(char c)
+{
+    int mselect = CurrentMenu->select;
+
+    if (mselect >= CurrentMenu->nitem)
+	return mLast(c);
+    if (CurrentMenu->offset + CurrentMenu->height >= CurrentMenu->nitem)
+	mselect++;
+    else {
+	down_menu(CurrentMenu, 1);
+	if (mselect < CurrentMenu->offset)
+	    mselect++;
+    }
+    goto_menu(CurrentMenu, mselect, 1);
+    return (MENU_NOTHING);
+}
+
+static int
+mLineD(char c)
+{
+    int mselect = CurrentMenu->select;
+
+    if (mselect <= 0)
+	return mTop(c);
+    if (CurrentMenu->offset <= 0)
+	mselect--;
+    else {
+	up_menu(CurrentMenu, 1);
+	if (mselect >= CurrentMenu->offset + CurrentMenu->height)
+	    mselect--;
+    }
+    goto_menu(CurrentMenu, mselect, -1);
+    return (MENU_NOTHING);
+}
+
+static int
+mOk(char c)
+{
+    int mselect = CurrentMenu->select;
+
+    if (CurrentMenu->item[mselect].type == MENU_NOP)
+	return (MENU_NOTHING);
+    return (mselect);
+}
+
+static int
+mCancel(char c)
+{
+    return (MENU_CANCEL);
+}
+
+static int
+mClose(char c)
+{
+    return (MENU_CLOSE);
+}
+
+static int
+mSusp(char c)
+{
+    susp();
+    draw_all_menu(CurrentMenu);
+    select_menu(CurrentMenu, CurrentMenu->select);
+    return (MENU_NOTHING);
+}
+
+static char *SearchString = NULL;
+
+int (*menuSearchRoutine) (Menu *, char *, int);
+
+static int
+menuForwardSearch(Menu *menu, char *str, int from)
+{
+    int i;
+    char *p;
+    if ((p = regexCompile(str, IgnoreCase)) != NULL) {
+	message(p, 0, 0);
+	return -1;
+    }
+    if (from < 0)
+	from = 0;
+    for (i = from; i < menu->nitem; i++)
+	if (menu->item[i].type != MENU_NOP &&
+	    regexMatch(menu->item[i].label, -1, 1) == 1)
+	    return i;
+    return -1;
+}
+
+static int
+menu_search_forward(Menu *menu, int from)
+{
+    char *str;
+    int found;
+    str = inputStrHist("Forward: ", NULL, TextHist);
+    if (str != NULL && *str == '\0')
+	str = SearchString;
+    if (str == NULL || *str == '\0')
+	return -1;
+    SearchString = str;
+    str = conv_search_string(str, DisplayCharset);
+    menuSearchRoutine = menuForwardSearch;
+    found = menuForwardSearch(menu, str, from + 1);
+    if (WrapSearch && found == -1)
+	found = menuForwardSearch(menu, str, 0);
+    if (found >= 0)
+	return found;
+    disp_message("Not found", TRUE);
+    return -1;
+}
+
+static int
+mSrchF(char c)
+{
+    int mselect;
+    mselect = menu_search_forward(CurrentMenu, CurrentMenu->select);
+    if (mselect >= 0)
+	goto_menu(CurrentMenu, mselect, 1);
+    return (MENU_NOTHING);
+}
+
+static int
+menuBackwardSearch(Menu *menu, char *str, int from)
+{
+    int i;
+    char *p;
+    if ((p = regexCompile(str, IgnoreCase)) != NULL) {
+	message(p, 0, 0);
+	return -1;
+    }
+    if (from >= menu->nitem)
+	from = menu->nitem - 1;
+    for (i = from; i >= 0; i--)
+	if (menu->item[i].type != MENU_NOP &&
+	    regexMatch(menu->item[i].label, -1, 1) == 1)
+	    return i;
+    return -1;
+}
+
+static int
+menu_search_backward(Menu *menu, int from)
+{
+    char *str;
+    int found;
+    str = inputStrHist("Backward: ", NULL, TextHist);
+    if (str != NULL && *str == '\0')
+	str = SearchString;
+    if (str == NULL || *str == '\0')
+	return -1;
+    SearchString = str;
+    str = conv_search_string(str, DisplayCharset);
+    menuSearchRoutine = menuBackwardSearch;
+    found = menuBackwardSearch(menu, str, from - 1);
+    if (WrapSearch && found == -1)
+	found = menuBackwardSearch(menu, str, menu->nitem);
+    if (found >= 0)
+	return found;
+    disp_message("Not found", TRUE);
+    return -1;
+}
+
+static int
+mSrchB(char c)
+{
+    int mselect;
+    mselect = menu_search_backward(CurrentMenu, CurrentMenu->select);
+    if (mselect >= 0)
+	goto_menu(CurrentMenu, mselect, -1);
+    return (MENU_NOTHING);
+}
+
+static int
+menu_search_next_previous(Menu *menu, int from, int reverse)
+{
+    int found;
+    static int (*routine[2]) (Menu *, char *, int) = {
+    menuForwardSearch, menuBackwardSearch};
+    char *str;
+
+    if (menuSearchRoutine == NULL) {
+	disp_message("No previous regular expression", TRUE);
+	return -1;
+    }
+    str = conv_search_string(SearchString, DisplayCharset);
+    if (reverse != 0)
+	reverse = 1;
+    if (menuSearchRoutine == menuBackwardSearch)
+	reverse ^= 1;
+    from += reverse ? -1 : 1;
+    found = (*routine[reverse]) (menu, str, from);
+    if (WrapSearch && found == -1)
+	found = (*routine[reverse]) (menu, str, reverse * menu->nitem);
+    if (found >= 0)
+	return found;
+    disp_message("Not found", TRUE);
+    return -1;
+}
+
+static int
+mSrchN(char c)
+{
+    int mselect;
+    mselect = menu_search_next_previous(CurrentMenu, CurrentMenu->select, 0);
+    if (mselect >= 0)
+	goto_menu(CurrentMenu, mselect, 1);
+    return (MENU_NOTHING);
+}
+
+static int
+mSrchP(char c)
+{
+    int mselect;
+    mselect = menu_search_next_previous(CurrentMenu, CurrentMenu->select, 1);
+    if (mselect >= 0)
+	goto_menu(CurrentMenu, mselect, -1);
+    return (MENU_NOTHING);
+}
+
+#ifdef USE_MOUSE
+#define MOUSE_BTN1_DOWN 0
+#define MOUSE_BTN2_DOWN 1
+#define MOUSE_BTN3_DOWN 2
+#define MOUSE_BTN4_DOWN_RXVT 3
+#define MOUSE_BTN5_DOWN_RXVT 4
+#define MOUSE_BTN4_DOWN_XTERM 64
+#define MOUSE_BTN5_DOWN_XTERM 65
+#define MOUSE_BTN_UP 3
+#define MOUSE_BTN_RESET -1
+
+static int
+mMouse_scroll_line(void)
+{
+    int i = 0;
+    if (relative_wheel_scroll)
+	i = (relative_wheel_scroll_ratio * CurrentMenu->height + 99) / 100;
+    else
+	i = fixed_wheel_scroll_count;
+    return i ? i : 1;
+}
+
+static int
+process_mMouse(int btn, int x, int y)
+{
+    Menu *menu;
+    int mselect, i;
+    static int press_btn = MOUSE_BTN_RESET, press_x, press_y;
+    char c = ' ';
+
+    menu = CurrentMenu;
+
+    if (x < 0 || x >= COLS || y < 0 || y > LASTLINE)
+	return (MENU_NOTHING);
+
+    if (btn == MOUSE_BTN_UP) {
+	switch (press_btn) {
+	case MOUSE_BTN1_DOWN:
+	case MOUSE_BTN3_DOWN:
+	    if (x < menu->x - FRAME_WIDTH ||
+		x >= menu->x + menu->width + FRAME_WIDTH ||
+		y < menu->y - 1 || y >= menu->y + menu->height + 1) {
+		return (MENU_CANCEL);
+	    }
+	    else if ((x >= menu->x - FRAME_WIDTH &&
+		      x < menu->x) ||
+		     (x >= menu->x + menu->width &&
+		      x < menu->x + menu->width + FRAME_WIDTH)) {
+		return (MENU_NOTHING);
+	    }
+	    else if (press_y > y) {
+		for (i = 0; i < press_y - y; i++)
+		    mLineU(c);
+		return (MENU_NOTHING);
+	    }
+	    else if (press_y < y) {
+		for (i = 0; i < y - press_y; i++)
+		    mLineD(c);
+		return (MENU_NOTHING);
+	    }
+	    else if (y == menu->y - 1) {
+		mPrev(c);
+		return (MENU_NOTHING);
+	    }
+	    else if (y == menu->y + menu->height) {
+		mNext(c);
+		return (MENU_NOTHING);
+	    }
+	    else {
+		mselect = y - menu->y + menu->offset;
+		if (menu->item[mselect].type == MENU_NOP)
+		    return (MENU_NOTHING);
+		return (select_menu(menu, mselect));
+	    }
+	    break;
+	case MOUSE_BTN4_DOWN_RXVT:
+	    for (i = 0; i < mMouse_scroll_line(); i++)
+		mLineD(c);
+	    break;
+	case MOUSE_BTN5_DOWN_RXVT:
+	    for (i = 0; i < mMouse_scroll_line(); i++)
+		mLineU(c);
+	    break;
+	}
+    }
+    else if (btn == MOUSE_BTN4_DOWN_XTERM) {
+	for (i = 0; i < mMouse_scroll_line(); i++)
+	    mLineD(c);
+    }
+    else if (btn == MOUSE_BTN5_DOWN_XTERM) {
+	for (i = 0; i < mMouse_scroll_line(); i++)
+	    mLineU(c);
+    }
+
+    if (btn != MOUSE_BTN4_DOWN_RXVT || press_btn == MOUSE_BTN_RESET) {
+	press_btn = btn;
+	press_x = x;
+	press_y = y;
+    }
+    else {
+	press_btn = MOUSE_BTN_RESET;
+    }
+    return (MENU_NOTHING);
+}
+
+static int
+mMouse(char c)
+{
+    int btn, x, y;
+
+    btn = (unsigned char)getch() - 32;
+#if defined(__CYGWIN__)
+    if (cygwin_mouse_btn_swapped) {
+	if (btn == MOUSE_BTN2_DOWN)
+	    btn = MOUSE_BTN3_DOWN;
+	else if (btn == MOUSE_BTN3_DOWN)
+	    btn = MOUSE_BTN2_DOWN;
+    }
+#endif
+    x = (unsigned char)getch() - 33;
+    if (x < 0)
+	x += 0x100;
+    y = (unsigned char)getch() - 33;
+    if (y < 0)
+	y += 0x100;
+
+    /* 
+     * if (x < 0 || x >= COLS || y < 0 || y > LASTLINE) return; */
+    return process_mMouse(btn, x, y);
+}
+
+#ifdef USE_GPM
+static int
+gpm_process_menu_mouse(Gpm_Event * event, void *data)
+{
+    int btn = MOUSE_BTN_RESET, x, y;
+    if (event->type & GPM_UP)
+	btn = MOUSE_BTN_UP;
+    else if (event->type & GPM_DOWN) {
+	switch (event->buttons) {
+	case GPM_B_LEFT:
+	    btn = MOUSE_BTN1_DOWN;
+	    break;
+	case GPM_B_MIDDLE:
+	    btn = MOUSE_BTN2_DOWN;
+	    break;
+	case GPM_B_RIGHT:
+	    btn = MOUSE_BTN3_DOWN;
+	    break;
+	}
+    }
+    else {
+	GPM_DRAWPOINTER(event);
+	return 0;
+    }
+    x = event->x;
+    y = event->y;
+    X_Mouse_Selection = process_mMouse(btn, x - 1, y - 1);
+    return X_MOUSE_SELECTED;
+}
+#endif				/* USE_GPM */
+
+#ifdef USE_SYSMOUSE
+static int
+sysm_process_menu_mouse(int x, int y, int nbs, int obs)
+{
+    int btn;
+    int bits;
+
+    if (obs & ~nbs)
+	btn = MOUSE_BTN_UP;
+    else if (nbs & ~obs) {
+	bits = nbs & ~obs;
+	btn = bits & 0x1 ? MOUSE_BTN1_DOWN :
+	    (bits & 0x2 ? MOUSE_BTN2_DOWN :
+	     (bits & 0x4 ? MOUSE_BTN3_DOWN : 0));
+    }
+    else			/* nbs == obs */
+	return 0;
+    X_Mouse_Selection = process_mMouse(btn, x, y);
+    return X_MOUSE_SELECTED;
+}
+#endif				/* USE_SYSMOUSE */
+#else				/* not USE_MOUSE */
+static int
+mMouse(char c)
+{
+    return (MENU_NOTHING);
+}
+#endif				/* not USE_MOUSE */
+
+/* --- MenuFunctions (END) --- */
+
+/* --- MainMenu --- */
+
+void
+popupMenu(int x, int y, Menu *menu)
+{
+    set_menu_frame();
+
+    initSelectMenu();
+    initSelTabMenu();
+
+    menu->cursorX = Currentbuf->cursorX + Currentbuf->rootX;
+    menu->cursorY = Currentbuf->cursorY + Currentbuf->rootY;
+    menu->x = x + FRAME_WIDTH + 1;
+    menu->y = y + 2;
+
+    popup_menu(NULL, menu);
+}
+
+void
+mainMenu(int x, int y)
+{
+    popupMenu(x, y, &MainMenu);
+}
+
+DEFUN(mainMn, MAIN_MENU MENU, "Popup menu")
+{
+    Menu *menu = &MainMenu;
+    char *data;
+    int n;
+    int x = Currentbuf->cursorX + Currentbuf->rootX,
+	y = Currentbuf->cursorY + Currentbuf->rootY;
+
+    data = searchKeyData();
+    if (data != NULL) {
+	n = getMenuN(w3mMenuList, data);
+	if (n < 0)
+	    return;
+	menu = w3mMenuList[n].menu;
+    }
+#ifdef USE_MOUSE
+    if (mouse_action.in_action) {
+	x = mouse_action.cursorX;
+	y = mouse_action.cursorY;
+    }
+#endif
+    popupMenu(x, y, menu);
+}
+
+/* --- MainMenu (END) --- */
+
+/* --- SelectMenu --- */
+
+DEFUN(selMn, SELECT_MENU, "Popup buffer selection menu")
+{
+    int x = Currentbuf->cursorX + Currentbuf->rootX,
+	y = Currentbuf->cursorY + Currentbuf->rootY;
+
+#ifdef USE_MOUSE
+    if (mouse_action.in_action) {
+	x = mouse_action.cursorX;
+	y = mouse_action.cursorY;
+    }
+#endif
+    popupMenu(x, y, &SelectMenu);
+}
+
+static void
+initSelectMenu(void)
+{
+    int i, nitem, len = 0, l;
+    Buffer *buf;
+    Str str;
+    char **label;
+    char *p;
+    static char *comment = " SPC for select / D for delete buffer ";
+
+    SelectV = -1;
+    for (i = 0, buf = Firstbuf; buf != NULL; i++, buf = buf->nextBuffer) {
+	if (buf == Currentbuf)
+	    SelectV = i;
+    }
+    nitem = i;
+
+    label = New_N(char *, nitem + 2);
+    for (i = 0, buf = Firstbuf; i < nitem; i++, buf = buf->nextBuffer) {
+	str = Sprintf("<%s>", buf->buffername);
+	if (buf->filename != NULL) {
+	    switch (buf->currentURL.scheme) {
+	    case SCM_LOCAL:
+		if (strcmp(buf->currentURL.file, "-")) {
+		    Strcat_char(str, ' ');
+		    Strcat_charp(str,
+				 conv_from_system(buf->currentURL.real_file));
+		}
+		break;
+		/* case SCM_UNKNOWN: */
+	    case SCM_MISSING:
+		break;
+	    default:
+		Strcat_char(str, ' ');
+		p = parsedURL2Str(&buf->currentURL)->ptr;
+		if (DecodeURL)
+		    p = url_unquote_conv(p, 0);
+		Strcat_charp(str, p);
+		break;
+	    }
+	}
+	label[i] = str->ptr;
+	if (len < str->length)
+	    len = str->length;
+    }
+    l = get_strwidth(comment);
+    if (len < l + 4)
+	len = l + 4;
+    if (len > COLS - 2 * FRAME_WIDTH)
+	len = COLS - 2 * FRAME_WIDTH;
+    len = (len > 1) ? ((len - l + 1) / 2) : 0;
+    str = Strnew();
+    for (i = 0; i < len; i++)
+	Strcat_char(str, '-');
+    Strcat_charp(str, comment);
+    for (i = 0; i < len; i++)
+	Strcat_char(str, '-');
+    label[nitem] = str->ptr;
+    label[nitem + 1] = NULL;
+
+    new_option_menu(&SelectMenu, label, &SelectV, smChBuf);
+    SelectMenu.initial = SelectV;
+    SelectMenu.cursorX = Currentbuf->cursorX + Currentbuf->rootX;
+    SelectMenu.cursorY = Currentbuf->cursorY + Currentbuf->rootY;
+    SelectMenu.keymap['D'] = smDelBuf;
+    SelectMenu.item[nitem].type = MENU_NOP;
+}
+
+static void
+smChBuf(void)
+{
+    int i;
+    Buffer *buf;
+
+    if (SelectV < 0 || SelectV >= SelectMenu.nitem)
+	return;
+    for (i = 0, buf = Firstbuf; i < SelectV; i++, buf = buf->nextBuffer) ;
+    Currentbuf = buf;
+    for (buf = Firstbuf; buf != NULL; buf = buf->nextBuffer) {
+	if (buf == Currentbuf)
+	    continue;
+#ifdef USE_IMAGE
+	deleteImage(buf);
+#endif
+	if (clear_buffer)
+	    tmpClearBuffer(buf);
+    }
+}
+
+static int
+smDelBuf(char c)
+{
+    int i, x, y, mselect;
+    Buffer *buf;
+
+    if (CurrentMenu->select < 0 || CurrentMenu->select >= SelectMenu.nitem)
+	return (MENU_NOTHING);
+    for (i = 0, buf = Firstbuf; i < CurrentMenu->select;
+	 i++, buf = buf->nextBuffer) ;
+    if (Currentbuf == buf)
+	Currentbuf = buf->nextBuffer;
+    Firstbuf = deleteBuffer(Firstbuf, buf);
+    if (!Currentbuf)
+	Currentbuf = nthBuffer(Firstbuf, i - 1);;
+    if (Firstbuf == NULL) {
+	Firstbuf = nullBuffer();
+	Currentbuf = Firstbuf;
+    }
+
+    x = CurrentMenu->x;
+    y = CurrentMenu->y;
+    mselect = CurrentMenu->select;
+
+    initSelectMenu();
+
+    CurrentMenu->x = x;
+    CurrentMenu->y = y;
+
+    geom_menu(CurrentMenu, x, y, 0);
+
+    CurrentMenu->select = (mselect <= CurrentMenu->nitem - 2) ? mselect
+	: (CurrentMenu->nitem - 2);
+
+    displayBuffer(Currentbuf, B_FORCE_REDRAW);
+    draw_all_menu(CurrentMenu);
+    select_menu(CurrentMenu, CurrentMenu->select);
+    return (MENU_NOTHING);
+}
+
+/* --- SelectMenu (END) --- */
+
+/* --- SelTabMenu --- */
+
+DEFUN(tabMn, TAB_MENU, "Popup tab selection menu")
+{
+    int x = Currentbuf->cursorX + Currentbuf->rootX,
+	y = Currentbuf->cursorY + Currentbuf->rootY;
+
+#ifdef USE_MOUSE
+    if (mouse_action.in_action) {
+	x = mouse_action.cursorX;
+	y = mouse_action.cursorY;
+    }
+#endif
+    popupMenu(x, y, &SelTabMenu);
+}
+
+static void
+initSelTabMenu(void)
+{
+    int i, nitem, len = 0, l;
+    TabBuffer *tab;
+    Buffer *buf;
+    Str str;
+    char **label;
+    char *p;
+    static char *comment = " SPC for select / D for delete tab ";
+
+    SelTabV = -1;
+    for (i = 0, tab = LastTab; tab != NULL; i++, tab = tab->prevTab) {
+	if (tab == CurrentTab)
+	    SelTabV = i;
+    }
+    nitem = i;
+
+    label = New_N(char *, nitem + 2);
+    for (i = 0, tab = LastTab; i < nitem; i++, tab = tab->prevTab) {
+	buf = tab->currentBuffer;
+	str = Sprintf("<%s>", buf->buffername);
+	if (buf->filename != NULL) {
+	    switch (buf->currentURL.scheme) {
+	    case SCM_LOCAL:
+		if (strcmp(buf->currentURL.file, "-")) {
+		    Strcat_char(str, ' ');
+		    Strcat_charp(str,
+				 conv_from_system(buf->currentURL.real_file));
+		}
+		break;
+		/* case SCM_UNKNOWN: */
+	    case SCM_MISSING:
+		break;
+	    default:
+		p = parsedURL2Str(&buf->currentURL)->ptr;
+		if (DecodeURL)
+		    p = url_unquote_conv(p, 0);
+		Strcat_charp(str, p);
+		break;
+	    }
+	}
+	label[i] = str->ptr;
+	if (len < str->length)
+	    len = str->length;
+    }
+    l = strlen(comment);
+    if (len < l + 4)
+	len = l + 4;
+    if (len > COLS - 2 * FRAME_WIDTH)
+	len = COLS - 2 * FRAME_WIDTH;
+    len = (len > 1) ? ((len - l + 1) / 2) : 0;
+    str = Strnew();
+    for (i = 0; i < len; i++)
+	Strcat_char(str, '-');
+    Strcat_charp(str, comment);
+    for (i = 0; i < len; i++)
+	Strcat_char(str, '-');
+    label[nitem] = str->ptr;
+    label[nitem + 1] = NULL;
+
+    new_option_menu(&SelTabMenu, label, &SelTabV, smChTab);
+    SelTabMenu.initial = SelTabV;
+    SelTabMenu.cursorX = Currentbuf->cursorX + Currentbuf->rootX;
+    SelTabMenu.cursorY = Currentbuf->cursorY + Currentbuf->rootY;
+    SelTabMenu.keymap['D'] = smDelTab;
+    SelTabMenu.item[nitem].type = MENU_NOP;
+}
+
+static void
+smChTab(void)
+{
+    int i;
+    TabBuffer *tab;
+    Buffer *buf;
+
+    if (SelTabV < 0 || SelTabV >= SelTabMenu.nitem)
+	return;
+    for (i = 0, tab = LastTab; i < SelTabV && tab != NULL;
+	 i++, tab = tab->prevTab) ;
+    CurrentTab = tab;
+    for (tab = LastTab; tab != NULL; tab = tab->prevTab) {
+	if (tab == CurrentTab)
+	    continue;
+	buf = tab->currentBuffer;
+#ifdef USE_IMAGE
+	deleteImage(buf);
+#endif
+	if (clear_buffer)
+	    tmpClearBuffer(buf);
+    }
+}
+
+static int
+smDelTab(char c)
+{
+    int i, x, y, mselect;
+    TabBuffer *tab;
+
+    if (CurrentMenu->select < 0 || CurrentMenu->select >= SelTabMenu.nitem)
+	return (MENU_NOTHING);
+    for (i = 0, tab = LastTab; i < CurrentMenu->select && tab != NULL;
+	 i++, tab = tab->prevTab) ;
+    deleteTab(tab);
+
+    x = CurrentMenu->x;
+    y = CurrentMenu->y;
+    mselect = CurrentMenu->select;
+
+    initSelTabMenu();
+
+    CurrentMenu->x = x;
+    CurrentMenu->y = y;
+
+    geom_menu(CurrentMenu, x, y, 0);
+
+    CurrentMenu->select = (mselect <= CurrentMenu->nitem - 2) ? mselect
+	: (CurrentMenu->nitem - 2);
+
+    displayBuffer(Currentbuf, B_FORCE_REDRAW);
+    draw_all_menu(CurrentMenu);
+    select_menu(CurrentMenu, CurrentMenu->select);
+    return (MENU_NOTHING);
+}
+
+/* --- SelectMenu (END) --- */
+
+/* --- OptionMenu --- */
+
+void
+optionMenu(int x, int y, char **label, int *variable, int initial,
+	   void (*func) ())
+{
+    Menu menu;
+
+    set_menu_frame();
+
+    new_option_menu(&menu, label, variable, func);
+    menu.cursorX = COLS - 1;
+    menu.cursorY = LASTLINE;
+    menu.x = x;
+    menu.y = y;
+    menu.initial = initial;
+
+    popup_menu(NULL, &menu);
+}
+
+/* --- OptionMenu (END) --- */
+
+/* --- InitMenu --- */
+
+static void
+interpret_menu(FILE * mf)
+{
+    Str line;
+    char *p, *s;
+    int in_menu = 0, nmenu = 0, nitem = 0, type;
+    MenuItem *item = NULL;
+#ifdef USE_M17N
+    wc_ces charset = SystemCharset;
+#endif
+
+    while (!feof(mf)) {
+	line = Strfgets(mf);
+	Strchop(line);
+	Strremovefirstspaces(line);
+	if (line->length == 0)
+	    continue;
+#ifdef USE_M17N
+	line = wc_Str_conv(line, charset, InnerCharset);
+#endif
+	p = line->ptr;
+	s = getWord(&p);
+	if (*s == '#')		/* comment */
+	    continue;
+	if (in_menu) {
+	    type = setMenuItem(&item[nitem], s, p);
+	    if (type == -1)
+		continue;	/* error */
+	    if (type == MENU_END)
+		in_menu = 0;
+	    else {
+		nitem++;
+		item = New_Reuse(MenuItem, item, (nitem + 1));
+		w3mMenuList[nmenu].item = item;
+		item[nitem].type = MENU_END;
+	    }
+	}
+	else if (!strcmp(s, "menu")) {
+	    s = getQWord(&p);
+	    if (*s == '\0')	/* error */
+		continue;
+	    in_menu = 1;
+	    if ((nmenu = getMenuN(w3mMenuList, s)) != -1)
+		w3mMenuList[nmenu].item = New(MenuItem);
+	    else
+		nmenu = addMenuList(&w3mMenuList, s);
+	    item = w3mMenuList[nmenu].item;
+	    nitem = 0;
+	    item[nitem].type = MENU_END;
+	}
+#ifdef USE_M17N
+	else if (!strcmp(s, "charset") || !strcmp(s, "encoding")) {
+	    s = getQWord(&p);
+	    if (*s == '\0')	/* error */
+		continue;
+	    charset = wc_guess_charset(s, charset);
+	}
+#endif
+    }
+}
+
+void
+initMenu(void)
+{
+    FILE *mf;
+    MenuList *list;
+
+    w3mMenuList = New_N(MenuList, 3);
+    w3mMenuList[0].id = "Main";
+    w3mMenuList[0].menu = &MainMenu;
+    w3mMenuList[0].item = MainMenuItem;
+    w3mMenuList[1].id = "Select";
+    w3mMenuList[1].menu = &SelectMenu;
+    w3mMenuList[1].item = NULL;
+    w3mMenuList[2].id = "SelectTab";
+    w3mMenuList[2].menu = &SelTabMenu;
+    w3mMenuList[2].item = NULL;
+    w3mMenuList[3].id = NULL;
+
+#ifdef USE_M17N
+    if (!MainMenuEncode) {
+	MenuItem *item;
+#if ENABLE_NLS
+	/* FIXME: charset that gettext(3) returns */
+	MainMenuCharset = SystemCharset;
+#endif
+	for (item = MainMenuItem; item->type != MENU_END; item++)
+	    item->label =
+		wc_conv(gettext(item->label), MainMenuCharset,
+			InnerCharset)->ptr;
+	MainMenuEncode = TRUE;
+    }
+#endif
+    if ((mf = fopen(confFile(MENU_FILE), "rt")) != NULL) {
+	interpret_menu(mf);
+	fclose(mf);
+    }
+    if ((mf = fopen(rcFile(MENU_FILE), "rt")) != NULL) {
+	interpret_menu(mf);
+	fclose(mf);
+    }
+
+    for (list = w3mMenuList; list->id != NULL; list++) {
+	if (list->item == NULL)
+	    continue;
+	new_menu(list->menu, list->item);
+    }
+}
+
+int
+setMenuItem(MenuItem *item, char *type, char *line)
+{
+    char *label, *func, *popup, *keys, *data;
+    int f;
+    int n;
+
+    if (type == NULL || *type == '\0')	/* error */
+	return -1;
+    if (strcmp(type, "end") == 0) {
+	item->type = MENU_END;
+	return MENU_END;
+    }
+    else if (strcmp(type, "nop") == 0) {
+	item->type = MENU_NOP;
+	item->label = getQWord(&line);
+	return MENU_NOP;
+    }
+    else if (strcmp(type, "func") == 0) {
+	label = getQWord(&line);
+	func = getWord(&line);
+	keys = getQWord(&line);
+	data = getQWord(&line);
+	if (*func == '\0')	/* error */
+	    return -1;
+	item->type = MENU_FUNC;
+	item->label = label;
+	f = getFuncList(func);
+	item->func = w3mFuncList[(f >= 0) ? f : FUNCNAME_nulcmd].func;
+	item->keys = keys;
+	item->data = data;
+	return MENU_FUNC;
+    }
+    else if (strcmp(type, "popup") == 0) {
+	label = getQWord(&line);
+	popup = getQWord(&line);
+	keys = getQWord(&line);
+	if (*popup == '\0')	/* error */
+	    return -1;
+	item->type = MENU_POPUP;
+	item->label = label;
+	if ((n = getMenuN(w3mMenuList, popup)) == -1)
+	    n = addMenuList(&w3mMenuList, popup);
+	item->popup = w3mMenuList[n].menu;
+	item->keys = keys;
+	return MENU_POPUP;
+    }
+    return -1;			/* error */
+}
+
+int
+addMenuList(MenuList **mlist, char *id)
+{
+    int n;
+    MenuList *list = *mlist;
+
+    for (n = 0; list->id != NULL; list++, n++) ;
+    *mlist = New_Reuse(MenuList, *mlist, (n + 2));
+    list = *mlist + n;
+    list->id = id;
+    list->menu = New(Menu);
+    list->item = New(MenuItem);
+    (list + 1)->id = NULL;
+    return n;
+}
+
+int
+getMenuN(MenuList *list, char *id)
+{
+    int n;
+
+    for (n = 0; list->id != NULL; list++, n++) {
+	if (strcmp(id, list->id) == 0)
+	    return n;
+    }
+    return -1;
+}
+
+/* --- InitMenu (END) --- */
+
+LinkList *
+link_menu(Buffer *buf)
+{
+    Menu menu;
+    LinkList *l;
+    int i, nitem, len = 0, linkV = -1;
+    char **label;
+    Str str;
+    char *p;
+
+    if (!buf->linklist)
+	return NULL;
+
+    for (i = 0, l = buf->linklist; l; i++, l = l->next) ;
+    nitem = i;
+
+    label = New_N(char *, nitem + 1);
+    for (i = 0, l = buf->linklist; l; i++, l = l->next) {
+	str = Strnew_charp(l->title ? l->title : "(empty)");
+	if (l->type == LINK_TYPE_REL)
+	    Strcat_charp(str, " [Rel] ");
+	else if (l->type == LINK_TYPE_REV)
+	    Strcat_charp(str, " [Rev] ");
+	else
+	    Strcat_charp(str, " ");
+	if (!l->url)
+	    p = "";
+	else if (DecodeURL)
+	    p = url_unquote_conv(l->url, buf->document_charset);
+	else
+	    p = l->url;
+	Strcat_charp(str, p);
+	label[i] = str->ptr;
+	if (len < str->length)
+	    len = str->length;
+    }
+    label[nitem] = NULL;
+
+    set_menu_frame();
+    new_option_menu(&menu, label, &linkV, NULL);
+
+    menu.initial = 0;
+    menu.cursorX = buf->cursorX + buf->rootX;
+    menu.cursorY = buf->cursorY + buf->rootY;
+    menu.x = menu.cursorX + FRAME_WIDTH + 1;
+    menu.y = menu.cursorY + 2;
+
+    popup_menu(NULL, &menu);
+
+    if (linkV < 0)
+	return NULL;
+    for (i = 0, l = buf->linklist; l; i++, l = l->next) {
+	if (i == linkV)
+	    return l;
+    }
+    return NULL;
+}
+
+/* --- LinkMenu (END) --- */
+
+Anchor *
+accesskey_menu(Buffer *buf)
+{
+    Menu menu;
+    AnchorList *al = buf->href;
+    Anchor *a;
+    Anchor **ap;
+    int i, n, nitem = 0, key = -1;
+    char **label;
+    char *t;
+    unsigned char c;
+
+    if (!al)
+	return NULL;
+    for (i = 0; i < al->nanchor; i++) {
+	a = &al->anchors[i];
+	if (!a->slave && a->accesskey && IS_ASCII(a->accesskey))
+	    nitem++;
+    }
+    if (!nitem)
+	return NULL;
+
+    label = New_N(char *, nitem + 1);
+    ap = New_N(Anchor *, nitem);
+    for (i = 0, n = 0; i < al->nanchor; i++) {
+	a = &al->anchors[i];
+	if (!a->slave && a->accesskey && IS_ASCII(a->accesskey)) {
+	    t = getAnchorText(buf, al, a);
+	    label[n] = Sprintf("%c: %s", a->accesskey, t ? t : "")->ptr;
+	    ap[n] = a;
+	    n++;
+	}
+    }
+    label[nitem] = NULL;
+
+    new_option_menu(&menu, label, &key, NULL);
+
+    menu.initial = 0;
+    menu.cursorX = buf->cursorX + buf->rootX;
+    menu.cursorY = buf->cursorY + buf->rootY;
+    menu.x = menu.cursorX + FRAME_WIDTH + 1;
+    menu.y = menu.cursorY + 2;
+    for (i = 0; i < 128; i++)
+	menu.keyselect[i] = -1;
+    for (i = 0; i < nitem; i++) {
+	c = ap[i]->accesskey;
+	menu.keymap[(int)c] = mSelect;
+	menu.keyselect[(int)c] = i;
+    }
+    for (i = 0; i < nitem; i++) {
+	c = ap[i]->accesskey;
+	if (!IS_ALPHA(c) || menu.keyselect[n] >= 0)
+	    continue;
+	c = TOLOWER(c);
+	menu.keymap[(int)c] = mSelect;
+	menu.keyselect[(int)c] = i;
+	c = TOUPPER(c);
+	menu.keymap[(int)c] = mSelect;
+	menu.keyselect[(int)c] = i;
+    }
+
+    a = retrieveCurrentAnchor(buf);
+    if (a && a->accesskey && IS_ASCII(a->accesskey)) {
+	for (i = 0; i < nitem; i++) {
+	    if (a->hseq == ap[i]->hseq) {
+		menu.initial = i;
+		break;
+	    }
+	}
+    }
+
+    popup_menu(NULL, &menu);
+
+    return (key >= 0) ? ap[key] : NULL;
+}
+
+static char lmKeys[] = "abcdefgimopqrstuvwxyz";
+static char lmKeys2[] = "1234567890ABCDEFGHILMOPQRSTUVWXYZ";
+#define nlmKeys (sizeof(lmKeys) - 1)
+#define nlmKeys2 (sizeof(lmKeys2) - 1)
+
+static int
+lmGoto(char c)
+{
+    if (IS_ASCII(c) && CurrentMenu->keyselect[(int)c] >= 0) {
+	goto_menu(CurrentMenu, CurrentMenu->nitem - 1, -1);
+	goto_menu(CurrentMenu, CurrentMenu->keyselect[(int)c] * nlmKeys, 1);
+    }
+    return (MENU_NOTHING);
+}
+
+static int
+lmSelect(char c)
+{
+    if (IS_ASCII(c))
+	return select_menu(CurrentMenu, (CurrentMenu->select / nlmKeys) *
+			   nlmKeys + CurrentMenu->keyselect[(int)c]);
+    else
+	return (MENU_NOTHING);
+}
+
+Anchor *
+list_menu(Buffer *buf)
+{
+    Menu menu;
+    AnchorList *al = buf->href;
+    Anchor *a;
+    Anchor **ap;
+    int i, n, nitem = 0, key = -1, two = FALSE;
+    char **label;
+    char *t;
+    unsigned char c;
+
+    if (!al)
+	return NULL;
+    for (i = 0; i < al->nanchor; i++) {
+	a = &al->anchors[i];
+	if (!a->slave)
+	    nitem++;
+    }
+    if (!nitem)
+	return NULL;
+
+    if (nitem >= nlmKeys)
+	two = TRUE;
+    label = New_N(char *, nitem + 1);
+    ap = New_N(Anchor *, nitem);
+    for (i = 0, n = 0; i < al->nanchor; i++) {
+	a = &al->anchors[i];
+	if (!a->slave) {
+	    t = getAnchorText(buf, al, a);
+	    if (!t)
+		t = "";
+	    if (two && n >= nlmKeys2 * nlmKeys)
+		label[n] = Sprintf("  : %s", t)->ptr;
+	    else if (two)
+		label[n] = Sprintf("%c%c: %s", lmKeys2[n / nlmKeys],
+				   lmKeys[n % nlmKeys], t)->ptr;
+	    else
+		label[n] = Sprintf("%c: %s", lmKeys[n], t)->ptr;
+	    ap[n] = a;
+	    n++;
+	}
+    }
+    label[nitem] = NULL;
+
+    set_menu_frame();
+    set_menu_frame();
+    new_option_menu(&menu, label, &key, NULL);
+
+    menu.initial = 0;
+    menu.cursorX = buf->cursorX + buf->rootX;
+    menu.cursorY = buf->cursorY + buf->rootY;
+    menu.x = menu.cursorX + FRAME_WIDTH + 1;
+    menu.y = menu.cursorY + 2;
+    for (i = 0; i < 128; i++)
+	menu.keyselect[i] = -1;
+    if (two) {
+	for (i = 0; i < nlmKeys2; i++) {
+	    c = lmKeys2[i];
+	    menu.keymap[(int)c] = lmGoto;
+	    menu.keyselect[(int)c] = i;
+	}
+	for (i = 0; i < nlmKeys; i++) {
+	    c = lmKeys[i];
+	    menu.keymap[(int)c] = lmSelect;
+	    menu.keyselect[(int)c] = i;
+	}
+    }
+    else {
+	for (i = 0; i < nitem; i++) {
+	    c = lmKeys[i];
+	    menu.keymap[(int)c] = mSelect;
+	    menu.keyselect[(int)c] = i;
+	}
+    }
+
+    a = retrieveCurrentAnchor(buf);
+    if (a) {
+	for (i = 0; i < nitem; i++) {
+	    if (a->hseq == ap[i]->hseq) {
+		menu.initial = i;
+		break;
+	    }
+	}
+    }
+
+    popup_menu(NULL, &menu);
+
+    return (key >= 0) ? ap[key] : NULL;
+}
+
+#endif				/* USE_MENU */