view oldXMenu/SetSel.c @ 104493:a4e1a12c8b97

* files.el (auto-mode-alist): Use emacs-lisp-mode for Project.ede. * cedet/semantic/bovine/gcc.el (semantic-gcc-test-output-parser) (semantic-gcc-test-output-parser-this-machine): * cedet/semantic/symref/filter.el (semantic-symref-test-count-hits-in-tag): * cedet/semantic/db-global.el (semanticdb-test-gnu-global): * cedet/semantic/tag-write.el (semantic-tag-write-test) (semantic-tag-write-list-test): * cedet/semantic/lex-spp.el (semantic-lex-spp-write-test) (semantic-lex-spp-write-utest): * cedet/semantic/lex.el (semantic-lex-test-region) (semantic-lex-test-full-depth): * cedet/semantic/idle.el (semantic-idle-pnf-test): * cedet/semantic/fw.el (semantic-test-data-cache) (semantic-test-throw-on-input): * cedet/semantic/format.el (semantic-test-all-format-tag-functions): * cedet/semantic/complete.el (semantic-complete-test): * cedet/semantic/db-ebrowse.el (semanticdb-ebrowse-run-tests) (semanticdb-ebrowse-dump): Test functions moved to semantic-tests.el in the test/ directory. * cedet/semantic/db-ref.el (semanticdb-ref-test): Doc fix.

/* Copyright    Massachusetts Institute of Technology    1985	*/

#include "copyright.h"


/*
 * XMenu:	MIT Project Athena, X Window system menu package
 *
 *	XMenuSetSelection - Set a menu selection to be active or inactive.
 *
 *	Author:		Tony Della Fera, DEC
 *			August, 1985
 *
 */

#include "XMenuInt.h"

int
XMenuSetSelection(menu, p_num, s_num, active)
    register XMenu *menu;	/* Menu object to be modified. */
    register int p_num;		/* Pane number to be modified. */
    register int s_num;		/* Selection number to modified. */
    int active;			/* Make selection active? */
{
    register XMPane *p_ptr;	/* XMPane pointer. */
    register XMSelect *s_ptr;	/* XMSelect pointer. */

    /*
     * Find the right pane.
     */
    p_ptr = _XMGetPanePtr(menu, p_num);
    if (p_ptr == NULL) return(XM_FAILURE);

    /*
     * Find the right selection.
     */
    s_ptr = _XMGetSelectionPtr(p_ptr, s_num);
    if (s_ptr == NULL) return(XM_FAILURE);

    /*
     * Set its active switch.
     */
    s_ptr->active = active;

    /*
     * Return the selection number just set.
     */
    _XMErrorCode = XME_NO_ERROR;
    return(s_num);
}

/* arch-tag: 79198ae0-c5a4-4d31-adb0-5747f833f56a
   (do not change this comment) */