Mercurial > emacs
annotate oldXMenu/Error.c @ 50826:1fe62a68c56a
(uniquify-buffer-name-style, uniquify-after-kill-buffer-p)
(uniquify-ask-about-buffer-names-p, uniquify-ignore-buffers-re)
(uniquify-min-dir-content, uniquify-separator, uniquify-trailing-separator-p):
Remove redundant group specification.
(uniquify-file-name-nondirectory): Delete.
(uniquify-rationalize-file-buffer-names): Simplify.
Use directory names as `filename' component of uniquify-item.
(uniquify-get-proposed-name): Adjust now that `filename' does not
include `base'.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 05 May 2003 16:55:38 +0000 |
parents | bbce331da1be |
children | 695cf19ef79e d7ddb3e565de |
rev | line source |
---|---|
25858 | 1 #include "copyright.h" |
2 | |
3 /* $Header: /u/src/emacs/19.0/oldXMenu/RCS/Error.c,v 1.1 1992/04/11 22:10:18 jimb Exp $ */ | |
4 /* Copyright Massachusetts Institute of Technology 1985 */ | |
5 | |
6 /* | |
7 * XMenu: MIT Project Athena, X Window system menu package | |
8 * | |
9 * XMenuError - Returns a string description of the current | |
10 * XMenu error status flag. | |
11 * | |
12 * Author: Tony Della Fera, DEC | |
13 * August, 1985 | |
14 * | |
15 */ | |
16 | |
17 #include "XMenuInt.h" | |
18 | |
19 char * | |
20 XMenuError() | |
21 { | |
22 static char message[128]; /* Error message buffer. */ | |
23 | |
24 if ((_XMErrorCode < XME_CODE_COUNT) && (_XMErrorCode >= 0)) { | |
25 return(_XMErrorList[_XMErrorCode]); | |
26 } | |
27 sprintf(message, "Unknown _XMErrorCode: %d", _XMErrorCode); | |
28 return(message); | |
29 } | |
30 |