Mercurial > vim

comparison src/gui_motif.c @ 6819:5f24d6d51333 v7.4.731

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 7.4.731 Problem: The tab menu shows "Close tab" even when it doesn't work. Solution: Don't show "Close tab" for the last tab. (John Marriott)
author Bram Moolenaar <bram@vim.org>
date Tue, 09 Jun 2015 19:14:24 +0200
parents 27b008d5b7ac
children a1e71a01dbd6
comparison
equal deleted inserted replaced
6818:50b60e51a231 6819:5f24d6d51333
538 538
539 /* Create the tabline popup menu */ 539 /* Create the tabline popup menu */
540 tabLine_menu = XmCreatePopupMenu(tabLine, "tabline popup", NULL, 0); 540 tabLine_menu = XmCreatePopupMenu(tabLine, "tabline popup", NULL, 0);
541 541
542 /* Add the buttons to the menu */ 542 /* Add the buttons to the menu */
543 n = 0; 543 if (first_tabpage->tp_next != NULL)
544 XtSetArg(args[n], XmNuserData, TABLINE_MENU_CLOSE); n++; 544 {
545 xms = XmStringCreate((char *)"Close tab", STRING_TAG); 545 n = 0;
546 XtSetArg(args[n], XmNlabelString, xms); n++; 546 XtSetArg(args[n], XmNuserData, TABLINE_MENU_CLOSE); n++;
547 button = XmCreatePushButton(tabLine_menu, "Close", args, n); 547 xms = XmStringCreate((char *)"Close tab", STRING_TAG);
548 XtAddCallback(button, XmNactivateCallback, 548 XtSetArg(args[n], XmNlabelString, xms); n++;
549 (XtCallbackProc)tabline_button_cb, NULL); 549 button = XmCreatePushButton(tabLine_menu, "Close", args, n);
550 XmStringFree(xms); 550 XtAddCallback(button, XmNactivateCallback,
551 (XtCallbackProc)tabline_button_cb, NULL);
552 XmStringFree(xms);
553 }
551 554
552 n = 0; 555 n = 0;
553 XtSetArg(args[n], XmNuserData, TABLINE_MENU_NEW); n++; 556 XtSetArg(args[n], XmNuserData, TABLINE_MENU_NEW); n++;
554 xms = XmStringCreate((char *)"New Tab", STRING_TAG); 557 xms = XmStringCreate((char *)"New Tab", STRING_TAG);
555 XtSetArg(args[n], XmNlabelString, xms); n++; 558 XtSetArg(args[n], XmNlabelString, xms); n++;