annotate oldXMenu/Recomp.c @ 99492:ee792794d888

(isearch-search-fun): Compare the length of the current search string with the length of the string from the previous search state to detect the situation when the user adds or removes characters in the search string. Use word-search-forward-lax and word-search-backward-lax in this case, and otherwise word-search-forward and word-search-backward.
author Juri Linkov <juri@jurta.org>
date Tue, 11 Nov 2008 19:43:09 +0000
parents fec5e03aaf59
children edf631bdbb7a ec58e5c426ef 5cc91198ffb2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
76174
fec5e03aaf59 Remove FSF copyright since file does not differ significantly from X11
Glenn Morris <rgm@gnu.org>
parents: 75348
diff changeset
1 /* Copyright Massachusetts Institute of Technology 1985 */
fec5e03aaf59 Remove FSF copyright since file does not differ significantly from X11
Glenn Morris <rgm@gnu.org>
parents: 75348
diff changeset
2
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
3 #include "copyright.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
4
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 * XMenuRecompute - Recompute XMenu object dependencies.
Dave Love <fx@gnu.org>
parents:
diff changeset
10 *
Dave Love <fx@gnu.org>
parents:
diff changeset
11 * Author: Tony Della Fera, DEC
Dave Love <fx@gnu.org>
parents:
diff changeset
12 * September, 1985
Dave Love <fx@gnu.org>
parents:
diff changeset
13 *
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 #include "XMenuInt.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
17
Dave Love <fx@gnu.org>
parents:
diff changeset
18 int
Dave Love <fx@gnu.org>
parents:
diff changeset
19 XMenuRecompute(display, menu)
Dave Love <fx@gnu.org>
parents:
diff changeset
20 Display *display;
Dave Love <fx@gnu.org>
parents:
diff changeset
21 register XMenu *menu; /* Menu object to be recomputed. */
Dave Love <fx@gnu.org>
parents:
diff changeset
22 {
Dave Love <fx@gnu.org>
parents:
diff changeset
23 register XMPane *p_ptr; /* Pane pointer. */
Dave Love <fx@gnu.org>
parents:
diff changeset
24 register XMSelect *s_ptr; /* Selection pointer. */
Dave Love <fx@gnu.org>
parents:
diff changeset
25
Dave Love <fx@gnu.org>
parents:
diff changeset
26 register int p_num; /* Pane serial number. */
Dave Love <fx@gnu.org>
parents:
diff changeset
27 register int s_num; /* Selection serial number. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 25858
diff changeset
28
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
29 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
30 * If there are no panes in the menu then return failure
Dave Love <fx@gnu.org>
parents:
diff changeset
31 * because the menu is not initialized.
Dave Love <fx@gnu.org>
parents:
diff changeset
32 */
Dave Love <fx@gnu.org>
parents:
diff changeset
33 if (menu->p_count == 0) {
Dave Love <fx@gnu.org>
parents:
diff changeset
34 _XMErrorCode = XME_NOT_INIT;
Dave Love <fx@gnu.org>
parents:
diff changeset
35 return(XM_FAILURE);
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 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
39 * Recompute menu wide global values: pane window size,
Dave Love <fx@gnu.org>
parents:
diff changeset
40 * selection size and maximum selection count.
Dave Love <fx@gnu.org>
parents:
diff changeset
41 */
Dave Love <fx@gnu.org>
parents:
diff changeset
42 _XMRecomputeGlobals(display, menu);
Dave Love <fx@gnu.org>
parents:
diff changeset
43
Dave Love <fx@gnu.org>
parents:
diff changeset
44 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
45 * For each pane in the menu...
Dave Love <fx@gnu.org>
parents:
diff changeset
46 */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 25858
diff changeset
47
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
48 p_num = 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
49 for (
Dave Love <fx@gnu.org>
parents:
diff changeset
50 p_ptr = menu->p_list->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
51 p_ptr != menu->p_list;
Dave Love <fx@gnu.org>
parents:
diff changeset
52 p_ptr = p_ptr->next
Dave Love <fx@gnu.org>
parents:
diff changeset
53 ){
Dave Love <fx@gnu.org>
parents:
diff changeset
54 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
55 * Recompute pane dependencies.
Dave Love <fx@gnu.org>
parents:
diff changeset
56 */
Dave Love <fx@gnu.org>
parents:
diff changeset
57 if (_XMRecomputePane(display, menu, p_ptr, p_num) == _FAILURE) {
Dave Love <fx@gnu.org>
parents:
diff changeset
58 return(XM_FAILURE);
Dave Love <fx@gnu.org>
parents:
diff changeset
59 }
Dave Love <fx@gnu.org>
parents:
diff changeset
60 p_num++;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 25858
diff changeset
61
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
62 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
63 * For each selection in the pane...
Dave Love <fx@gnu.org>
parents:
diff changeset
64 */
Dave Love <fx@gnu.org>
parents:
diff changeset
65 s_num = 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
66 for (
Dave Love <fx@gnu.org>
parents:
diff changeset
67 s_ptr = p_ptr->s_list->next;
Dave Love <fx@gnu.org>
parents:
diff changeset
68 s_ptr != p_ptr->s_list;
Dave Love <fx@gnu.org>
parents:
diff changeset
69 s_ptr = s_ptr->next
Dave Love <fx@gnu.org>
parents:
diff changeset
70 ) {
Dave Love <fx@gnu.org>
parents:
diff changeset
71 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
72 * Recompute selection dependencies.
Dave Love <fx@gnu.org>
parents:
diff changeset
73 */
Dave Love <fx@gnu.org>
parents:
diff changeset
74 if (_XMRecomputeSelection(display, menu, s_ptr, s_num) == _FAILURE) {
Dave Love <fx@gnu.org>
parents:
diff changeset
75 return(XM_FAILURE);
Dave Love <fx@gnu.org>
parents:
diff changeset
76 }
Dave Love <fx@gnu.org>
parents:
diff changeset
77 s_num++;
Dave Love <fx@gnu.org>
parents:
diff changeset
78 }
Dave Love <fx@gnu.org>
parents:
diff changeset
79 }
Dave Love <fx@gnu.org>
parents:
diff changeset
80
Dave Love <fx@gnu.org>
parents:
diff changeset
81 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
82 * Recompute menu size.
Dave Love <fx@gnu.org>
parents:
diff changeset
83 */
Dave Love <fx@gnu.org>
parents:
diff changeset
84 if (menu->menu_style == CENTER) {
Dave Love <fx@gnu.org>
parents:
diff changeset
85 menu->width = menu->p_width + (menu->p_bdr_width << 1);
Dave Love <fx@gnu.org>
parents:
diff changeset
86 }
Dave Love <fx@gnu.org>
parents:
diff changeset
87 else {
Dave Love <fx@gnu.org>
parents:
diff changeset
88 menu->width = menu->p_width + (menu->p_bdr_width << 1) +
Dave Love <fx@gnu.org>
parents:
diff changeset
89 ((menu->p_count - 1) * menu->p_x_off);
Dave Love <fx@gnu.org>
parents:
diff changeset
90 }
Dave Love <fx@gnu.org>
parents:
diff changeset
91 menu->height = menu->p_height + (menu->p_bdr_width << 1) +
Dave Love <fx@gnu.org>
parents:
diff changeset
92 ((menu->p_count - 1) * menu->p_y_off);
Dave Love <fx@gnu.org>
parents:
diff changeset
93
Dave Love <fx@gnu.org>
parents:
diff changeset
94 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
95 * Reset the recompute flag.
Dave Love <fx@gnu.org>
parents:
diff changeset
96 */
Dave Love <fx@gnu.org>
parents:
diff changeset
97 menu->recompute = 0;
Dave Love <fx@gnu.org>
parents:
diff changeset
98
Dave Love <fx@gnu.org>
parents:
diff changeset
99 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
100 * Return successfully.
Dave Love <fx@gnu.org>
parents:
diff changeset
101 */
Dave Love <fx@gnu.org>
parents:
diff changeset
102 _XMErrorCode = XME_NO_ERROR;
Dave Love <fx@gnu.org>
parents:
diff changeset
103 return(XM_SUCCESS);
Dave Love <fx@gnu.org>
parents:
diff changeset
104 }
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
105
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
106 /* arch-tag: 1fe99b82-3873-4aab-b2b3-f277c93e00d9
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
107 (do not change this comment) */