diff options
| author | Richard M. Stallman | 1996-09-04 15:40:46 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-04 15:40:46 +0000 |
| commit | 4a9f44cd824ab47bfff7fb31b39ad0bca181f898 (patch) | |
| tree | 2650e551400c6dc06b19011c23aa3387b80479ca | |
| parent | d2609065f8d2c45154f9fd061cb9fa2338397ede (diff) | |
| download | emacs-4a9f44cd824ab47bfff7fb31b39ad0bca181f898.tar.gz emacs-4a9f44cd824ab47bfff7fb31b39ad0bca181f898.zip | |
(get_local_map): Call indirect-function.
| -rw-r--r-- | src/intervals.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/intervals.c b/src/intervals.c index 00c7395cbb0..0cc28ac2751 100644 --- a/src/intervals.c +++ b/src/intervals.c | |||
| @@ -1789,6 +1789,9 @@ get_local_map (position, buffer) | |||
| 1789 | BUF_ZV (buffer) = old_zv; | 1789 | BUF_ZV (buffer) = old_zv; |
| 1790 | 1790 | ||
| 1791 | /* Use the local map only if it is valid. */ | 1791 | /* Use the local map only if it is valid. */ |
| 1792 | /* Do allow symbols that are defined as keymaps. */ | ||
| 1793 | if (SYMBOLP (prop) && !NILP (prop)) | ||
| 1794 | prop = Findirect_function (prop); | ||
| 1792 | if (!NILP (prop) | 1795 | if (!NILP (prop) |
| 1793 | && (tem = Fkeymapp (prop), !NILP (tem))) | 1796 | && (tem = Fkeymapp (prop), !NILP (tem))) |
| 1794 | return prop; | 1797 | return prop; |