Mercurial > emacs

comparison src/keymap.c @ 59754:a9fbaec66c84

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(access_keymap): YAILOM.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 28 Jan 2005 16:25:10 +0000
parents e7a8549bb201
children eca75f16d020 3dcba0bc766b f8a7a9ba3d08
comparison
equal deleted inserted replaced
59753:99d43429a1c6 59754:a9fbaec66c84
1 /* Manipulation of keymaps 1 /* Manipulation of keymaps
2 Copyright (C) 1985, 86,87,88,93,94,95,98,99, 2000, 01, 2004 2 Copyright (C) 1985, 1986, 1987, 1988, 1993, 1994, 1995, 1998, 1999, 2000,
3 Free Software Foundation, Inc. 3 2001, 2004, 2005 Free Software Foundation, Inc.
4 4
5 This file is part of GNU Emacs. 5 This file is part of GNU Emacs.
6 6
7 GNU Emacs is free software; you can redistribute it and/or modify 7 GNU Emacs is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by 8 it under the terms of the GNU General Public License as published by
528 struct gcpro gcpro1; 528 struct gcpro gcpro1;
529 Lisp_Object meta_map; 529 Lisp_Object meta_map;
530 GCPRO1 (map); 530 GCPRO1 (map);
531 /* A strange value in which Meta is set would cause 531 /* A strange value in which Meta is set would cause
532 infinite recursion. Protect against that. */ 532 infinite recursion. Protect against that. */
533 if (meta_prefix_char & CHAR_META) 533 if (XINT (meta_prefix_char) & CHAR_META)
534 meta_prefix_char = make_number (27); 534 meta_prefix_char = make_number (27);
535 meta_map = get_keymap (access_keymap (map, meta_prefix_char, 535 meta_map = get_keymap (access_keymap (map, meta_prefix_char,
536 t_ok, noinherit, autoload), 536 t_ok, noinherit, autoload),
537 0, autoload); 537 0, autoload);
538 UNGCPRO; 538 UNGCPRO;