Mercurial > emacs
comparison src/keymap.c @ 12151:43b030e896eb
(Flookup_key, Fdefine_key): Use Fevent_convert_list.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Fri, 09 Jun 1995 01:15:14 +0000 |
parents | 4e0f3e3b4cc7 |
children | a7d5578ebb25 |
comparison
equal
deleted
inserted
replaced
12150:64b16f71a15c | 12151:43b030e896eb |
---|---|
605 while (1) | 605 while (1) |
606 { | 606 { |
607 c = Faref (key, make_number (idx)); | 607 c = Faref (key, make_number (idx)); |
608 | 608 |
609 if (CONSP (c) && lucid_event_type_list_p (c)) | 609 if (CONSP (c) && lucid_event_type_list_p (c)) |
610 c = convert_event_type_list (c); | 610 c = Fevent_convert_list (c); |
611 | 611 |
612 if (INTEGERP (c) | 612 if (INTEGERP (c) |
613 && (XINT (c) & meta_bit) | 613 && (XINT (c) & meta_bit) |
614 && !metized) | 614 && !metized) |
615 { | 615 { |
699 while (1) | 699 while (1) |
700 { | 700 { |
701 c = Faref (key, make_number (idx)); | 701 c = Faref (key, make_number (idx)); |
702 | 702 |
703 if (CONSP (c) && lucid_event_type_list_p (c)) | 703 if (CONSP (c) && lucid_event_type_list_p (c)) |
704 c = convert_event_type_list (c); | 704 c = Fevent_convert_list (c); |
705 | 705 |
706 if (INTEGERP (c) | 706 if (INTEGERP (c) |
707 && (XINT (c) & meta_bit) | 707 && (XINT (c) & meta_bit) |
708 && !metized) | 708 && !metized) |
709 { | 709 { |