Mercurial > emacs
annotate oldXMenu/SetPane.c @ 54770:e8824c4f5f7e
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-196
Remove RCS keywords
2004-04-10 Miles Bader <miles@gnu.org>
RCS keyword removal (only non-comment changes are enumerated here):
* lisp/emacs-lisp/bytecomp.el (byte-compile-version): Variable removed.
(byte-compile-insert-header): Don't use `byte-compile-version'.
* lisp/url/url-vars.el (url-version): Use the constant string "Emacs"
instead of calculating something from the RCS `State' keyword
[the latter is almost entirely useless anyway].
* lisp/forms.el (forms-version): Variable removed.
(forms-mode): Don't use `forms-version'.
* lisp/recentf.el (recentf-version): Variable removed.
* lisp/progmodes/delphi.el (delphi-version): Variable removed.
* lisp/progmodes/ada-mode.el (ada-mode): RCS keyword removed from docstring.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sat, 10 Apr 2004 05:55:49 +0000 |
parents | 695cf19ef79e |
children | 3861ff8f4bf1 8e5779acd195 |
rev | line source |
---|---|
25858 | 1 #include "copyright.h" |
2 | |
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 | |
17 int | |
18 XMenuSetPane(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 } | |
52401 | 43 |
44 /* arch-tag: 90bc8d90-031d-41a2-a2c6-04bf94efbc90 | |
45 (do not change this comment) */ |