annotate oldXMenu/FindSel.c @ 66046:f56e7dee3fe4

(fancy-splash-default-action): Discard mouse click in the spash screen window, as it has no sensible meaning in the next window to be selected. Fixes error reported by Jan D.
author Kim F. Storm <storm@cua.dk>
date Wed, 12 Oct 2005 11:22:57 +0000
parents 3861ff8f4bf1
children e8a3fb527b77 532e0a9335a9 2d92f5c9d6ae
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
1 #include "copyright.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
2
Dave Love <fx@gnu.org>
parents:
diff changeset
3 /* Copyright Massachusetts Institute of Technology 1985 */
65000
3861ff8f4bf1 Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 54770
diff changeset
4 /* Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc. */
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
5
Dave Love <fx@gnu.org>
parents:
diff changeset
6 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
7 * XMenu: MIT Project Athena, X Window system menu package
Dave Love <fx@gnu.org>
parents:
diff changeset
8 *
Dave Love <fx@gnu.org>
parents:
diff changeset
9 * XMenuFindSelection - Find the first selection in a pane who's
Dave Love <fx@gnu.org>
parents:
diff changeset
10 * label matches a particular string.
Dave Love <fx@gnu.org>
parents:
diff changeset
11 *
Dave Love <fx@gnu.org>
parents:
diff changeset
12 * Author: Tony Della Fera, DEC
Dave Love <fx@gnu.org>
parents:
diff changeset
13 * January 22, 1986
Dave Love <fx@gnu.org>
parents:
diff changeset
14 *
Dave Love <fx@gnu.org>
parents:
diff changeset
15 */
Dave Love <fx@gnu.org>
parents:
diff changeset
16
Dave Love <fx@gnu.org>
parents:
diff changeset
17 #include "XMenuInt.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
18
Dave Love <fx@gnu.org>
parents:
diff changeset
19 int
Dave Love <fx@gnu.org>
parents:
diff changeset
20 XMenuFindSelection(menu, p_num, label)
Dave Love <fx@gnu.org>
parents:
diff changeset
21 register XMenu *menu;
Dave Love <fx@gnu.org>
parents:
diff changeset
22 int p_num;
Dave Love <fx@gnu.org>
parents:
diff changeset
23 register char *label;
Dave Love <fx@gnu.org>
parents:
diff changeset
24 {
Dave Love <fx@gnu.org>
parents:
diff changeset
25 register XMPane *p_ptr;
Dave Love <fx@gnu.org>
parents:
diff changeset
26 register XMSelect *s_ptr;
Dave Love <fx@gnu.org>
parents:
diff changeset
27 register int i = 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
28
Dave Love <fx@gnu.org>
parents:
diff changeset
29 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
30 * Check for NULL pointers!
Dave Love <fx@gnu.org>
parents:
diff changeset
31 */
Dave Love <fx@gnu.org>
parents:
diff changeset
32 if (label == NULL) {
Dave Love <fx@gnu.org>
parents:
diff changeset
33 _XMErrorCode = XME_ARG_BOUNDS;
Dave Love <fx@gnu.org>
parents:
diff changeset
34 return(XM_FAILURE);
Dave Love <fx@gnu.org>
parents:
diff changeset
35 }
Dave Love <fx@gnu.org>
parents:
diff changeset
36
Dave Love <fx@gnu.org>
parents:
diff changeset
37 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
38 * Find the right pane.
Dave Love <fx@gnu.org>
parents:
diff changeset
39 */
Dave Love <fx@gnu.org>
parents:
diff changeset
40 p_ptr = _XMGetPanePtr(menu, p_num);
Dave Love <fx@gnu.org>
parents:
diff changeset
41 if (p_ptr == NULL) return(XM_FAILURE);
Dave Love <fx@gnu.org>
parents:
diff changeset
42
Dave Love <fx@gnu.org>
parents:
diff changeset
43 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
44 * Find the right selection.
Dave Love <fx@gnu.org>
parents:
diff changeset
45 */
Dave Love <fx@gnu.org>
parents:
diff changeset
46 for (
Dave Love <fx@gnu.org>
parents:
diff changeset
47 s_ptr = p_ptr->s_list->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
48 s_ptr != p_ptr->s_list;
Dave Love <fx@gnu.org>
parents:
diff changeset
49 s_ptr = s_ptr->next
Dave Love <fx@gnu.org>
parents:
diff changeset
50 ){
Dave Love <fx@gnu.org>
parents:
diff changeset
51 if (s_ptr->label_length == 0) {
Dave Love <fx@gnu.org>
parents:
diff changeset
52 if (*label == '\0') {
Dave Love <fx@gnu.org>
parents:
diff changeset
53 _XMErrorCode = XME_NO_ERROR;
Dave Love <fx@gnu.org>
parents:
diff changeset
54 return (i);
Dave Love <fx@gnu.org>
parents:
diff changeset
55 }
Dave Love <fx@gnu.org>
parents:
diff changeset
56 }
Dave Love <fx@gnu.org>
parents:
diff changeset
57 else {
Dave Love <fx@gnu.org>
parents:
diff changeset
58 if (strncmp (label, s_ptr->label, s_ptr->label_length) == 0) {
Dave Love <fx@gnu.org>
parents:
diff changeset
59 _XMErrorCode = XME_NO_ERROR;
Dave Love <fx@gnu.org>
parents:
diff changeset
60 return (i);
Dave Love <fx@gnu.org>
parents:
diff changeset
61 }
Dave Love <fx@gnu.org>
parents:
diff changeset
62 }
Dave Love <fx@gnu.org>
parents:
diff changeset
63 i++;
Dave Love <fx@gnu.org>
parents:
diff changeset
64 }
Dave Love <fx@gnu.org>
parents:
diff changeset
65
Dave Love <fx@gnu.org>
parents:
diff changeset
66 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
67 * If we get here then we have not found
Dave Love <fx@gnu.org>
parents:
diff changeset
68 * a match.
Dave Love <fx@gnu.org>
parents:
diff changeset
69 */
Dave Love <fx@gnu.org>
parents:
diff changeset
70 _XMErrorCode = XME_S_NOT_FOUND;
Dave Love <fx@gnu.org>
parents:
diff changeset
71 return (XM_FAILURE);
Dave Love <fx@gnu.org>
parents:
diff changeset
72 }
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 25858
diff changeset
73
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 25858
diff changeset
74 /* arch-tag: 564a4a95-9ab0-4580-b05f-6970c4b25dd4
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 25858
diff changeset
75 (do not change this comment) */