1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-11 09:20:51 +00:00
emacs/oldXMenu/Error.c
Miles Bader 1f3ddf11e8 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.
2004-04-10 05:55:49 +00:00

32 lines
695 B
C

#include "copyright.h"
/* Copyright Massachusetts Institute of Technology 1985 */
/*
* XMenu: MIT Project Athena, X Window system menu package
*
* XMenuError - Returns a string description of the current
* XMenu error status flag.
*
* Author: Tony Della Fera, DEC
* August, 1985
*
*/
#include "XMenuInt.h"
char *
XMenuError()
{
static char message[128]; /* Error message buffer. */
if ((_XMErrorCode < XME_CODE_COUNT) && (_XMErrorCode >= 0)) {
return(_XMErrorList[_XMErrorCode]);
}
sprintf(message, "Unknown _XMErrorCode: %d", _XMErrorCode);
return(message);
}
/* arch-tag: 5fff4a23-40ca-40d0-8887-c50fc73dea9d
(do not change this comment) */