new non-standard mode: -o emacs-usemeta (on by default)

from naddy@, thanks
This commit is contained in:
tg
2003-06-26 18:26:21 +00:00
parent 1d75ca6305
commit f31bf084e3
4 changed files with 20 additions and 8 deletions

View File

@ -1,3 +1,4 @@
/* $MirBSD: emacs.c,v 1.2 2003/06/26 18:26:21 tg Exp $ */
/* $OpenBSD: emacs.c,v 1.19 2003/04/16 23:11:52 tdeval Exp $ */
/*
@ -25,7 +26,7 @@ static Area aedit;
#define CTRL(x) ((x) == '?' ? 0x7F : (x) & 0x1F) /* ASCII */
#define UNCTRL(x) ((x) == 0x7F ? '?' : (x) | 0x40) /* ASCII */
#define META(x) ((x) & 0x7f)
#define ISMETA(x) (x_usemeta && ((x) & 0x80))
#define ISMETA(x) (Flag(FEMACSUSEMETA) && ((x) & 0x80))
/* values returned by keyboard functions */
@ -101,7 +102,6 @@ static int x_col;
static int x_displen;
static int x_arg; /* general purpose arg */
static int x_arg_defaulted;/* x_arg not explicitly set; defaulted to 1 */
static int x_usemeta; /* no 8-bit ascii, meta = ESC */
static int xlp_valid;
/* end from 4.9 edit.h } */
@ -1530,7 +1530,7 @@ x_init_emacs()
*/
locale = setlocale(LC_CTYPE, NULL);
if (locale == NULL || !strcmp(locale, "C") || !strcmp(locale, "POSIX"))
x_usemeta = 1;
Flag(FEMACSUSEMETA) = 1;
}
static void