SetSel.c

Revision 4196, 1.2 kB (checked in by miyoshi, 2 years ago)
Sync up with Emacs CVS HEAD.
Property svn:eol-style set to `native`

Line
1	/* Copyright Massachusetts Institute of Technology 1985 */
2
3	#include "copyright.h"
4
5
6	/*
7	* XMenu: MIT Project Athena, X Window system menu package
8	*
9	* XMenuSetSelection - Set a menu selection to be active or inactive.
10	*
11	* Author: Tony Della Fera, DEC
12	* August, 1985
13	*
14	*/
15
16	#include "XMenuInt.h"
17
18	int
19	XMenuSetSelection(menu, p_num, s_num, active)
20	register XMenu menu; / Menu object to be modified. */
21	register int p_num; /* Pane number to be modified. */
22	register int s_num; /* Selection number to modified. */
23	int active; /* Make selection active? */
24	{
25	register XMPane p_ptr; / XMPane pointer. */
26	register XMSelect s_ptr; / XMSelect pointer. */
27
28	/*
29	* Find the right pane.
30	*/
31	p_ptr = _XMGetPanePtr(menu, p_num);
32	if (p_ptr == NULL) return(XM_FAILURE);
33
34	/*
35	* Find the right selection.
36	*/
37	s_ptr = _XMGetSelectionPtr(p_ptr, s_num);
38	if (s_ptr == NULL) return(XM_FAILURE);
39
40	/*
41	* Set its active switch.
42	*/
43	s_ptr->active = active;
44
45	/*
46	* Return the selection number just set.
47	*/
48	_XMErrorCode = XME_NO_ERROR;
49	return(s_num);
50	}
51
52	/* arch-tag: 79198ae0-c5a4-4d31-adb0-5747f833f56a
53	(do not change this comment) */

Note: See TracBrowser for help on using the browser.