Mercurial > emacs
annotate oldXMenu/ChgPane.c @ 110056:8be2f62f7851
Fix several Package Menu and Finder bugs.
* finder.el: Load finder-inf using `require'.
(finder-list-matches): Sorting by status is now the default.
(finder-compile-keywords): Simpify printing.
* emacs-lisp/package.el (package--read-archive-file): Just use
`read', to avoid copying an additional string.
(package-menu-mode): Set header-line-format here.
(package-menu-refresh, package-menu-revert): Signal an error if
not in the Package Menu.
(package-menu-package-list): New var.
(package--generate-package-list): Operate on the current buffer;
don't assume that it is *Packages*, since the user may rename it.
Allow persistent package listings and sort keys using
package-menu-package-list and package-menu-package-sort-key.
(package-menu--version-predicate): Fix version calculation.
(package-menu-sort-by-column): Don't select the window.
(package--list-packages): Create the *Packages* buffer. Set
package-menu-package-list-key.
(list-packages): Sorting by status is now the default.
(package-buffer-info): Use match-string-no-properties.
(define-package): Add a &rest argument for future proofing, but
don't use it yet.
(package-install-from-buffer, package-install-buffer-internal):
Merged into a single function, package-install-from-buffer.
(package-install-file): Caller changed.
Also, fix headers for hfy-cmap.el and ps-print.el.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 30 Aug 2010 21:53:46 -0400 |
parents | 5cc91198ffb2 |
children | ef719132ddfa |
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 | 3 #include "copyright.h" |
4 | |
5 | |
6 /* | |
7 * XMenu: MIT Project Athena, X Window system menu package | |
8 * | |
9 * XMenuChangePane - Change the label of a menu pane. | |
10 * | |
11 * Author: Tony Della Fera, DEC | |
12 * December 19, 1985 | |
13 * | |
14 */ | |
15 | |
77868
d4f6522bb9d2
Quiet --with-x-toolkit=no compilation warnings: #include <config.h>.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
76174
diff
changeset
|
16 #include <config.h> |
25858 | 17 #include "XMenuInt.h" |
18 | |
19 int | |
109124
5cc91198ffb2
Convert function definitions in oldXMenu to standard C.
Dan Nicolaescu <dann@ics.uci.edu>
parents:
77868
diff
changeset
|
20 XMenuChangePane(register XMenu *menu, register int p_num, char *label) |
5cc91198ffb2
Convert function definitions in oldXMenu to standard C.
Dan Nicolaescu <dann@ics.uci.edu>
parents:
77868
diff
changeset
|
21 /* Menu object to be modified. */ |
5cc91198ffb2
Convert function definitions in oldXMenu to standard C.
Dan Nicolaescu <dann@ics.uci.edu>
parents:
77868
diff
changeset
|
22 /* Pane number to be modified. */ |
5cc91198ffb2
Convert function definitions in oldXMenu to standard C.
Dan Nicolaescu <dann@ics.uci.edu>
parents:
77868
diff
changeset
|
23 /* Selection label. */ |
25858 | 24 { |
25 register XMPane *p_ptr; /* XMPane pointer. */ | |
26 | |
27 int label_length; /* Label length in characters. */ | |
28 int label_width; /* Label width in pixels. */ | |
29 | |
30 /* | |
31 * Check for NULL pointers! | |
32 */ | |
33 if (label == NULL) { | |
34 _XMErrorCode = XME_ARG_BOUNDS; | |
35 return(XM_FAILURE); | |
36 } | |
37 | |
38 /* | |
39 * Find the right pane. | |
40 */ | |
41 p_ptr = _XMGetPanePtr(menu, p_num); | |
42 if (p_ptr == NULL) return(XM_FAILURE); | |
43 | |
44 /* | |
45 * Determine label size. | |
46 */ | |
47 label_length = strlen(label); | |
48 label_width = XTextWidth(menu->p_fnt_info, label, label_length); | |
49 | |
50 /* | |
51 * Change the pane data. | |
52 */ | |
53 p_ptr->label = label; | |
54 p_ptr->label_width = label_width; | |
55 p_ptr->label_length = label_length; | |
56 | |
57 /* | |
58 * Schedule a recompute. | |
59 */ | |
60 menu->recompute = 1; | |
61 | |
62 /* | |
63 * Return the pane number just changed. | |
64 */ | |
65 _XMErrorCode = XME_NO_ERROR; | |
66 return(p_num); | |
67 } | |
52401 | 68 |
69 /* arch-tag: e267e9de-a3f0-4a0d-8c45-413afa176fd8 | |
70 (do not change this comment) */ |