(Info-search-whitespace-regexp): Fix backslashes.
[bpt/emacs.git] / oldXMenu / SetPane.c
CommitLineData
e745ede7
DL
1#include "copyright.h"
2
e745ede7
DL
3/* Copyright Massachusetts Institute of Technology 1985 */
4
5/*
6 * XMenu: MIT Project Athena, X Window system menu package
7 *
8 * XMenuSetPane - Set a menu pane to be active or inactive.
9 *
10 * Author: Tony Della Fera, DEC
11 * August, 1985
12 *
13 */
14
15#include "XMenuInt.h"
16
17int
18XMenuSetPane(menu, p_num, active)
19 register XMenu *menu; /* Menu object to be modified. */
20 register int p_num; /* Pane number to be modified. */
21 register int active; /* Make selection active? */
22{
23 register XMPane *p_ptr; /* XMPane pointer. */
24
25 /*
26 * Find the right pane.
27 */
28 p_ptr = _XMGetPanePtr(menu, p_num);
29 if (p_ptr == NULL) return(XM_FAILURE);
30
31 /*
32 * Set its active switch.
33 */
34 p_ptr->active = active;
35 if (p_ptr->active == False) p_ptr->activated = False;
36
37 /*
38 * Return the pane number just set.
39 */
40 _XMErrorCode = XME_NO_ERROR;
41 return(p_num);
42}
ab5796a9
MB
43
44/* arch-tag: 90bc8d90-031d-41a2-a2c6-04bf94efbc90
45 (do not change this comment) */