diff options
| author | Kenichi Handa <handa@m17n.org> | 1998-04-20 02:14:57 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1998-04-20 02:14:57 +0000 |
| commit | 22d3d9cf0b4885e14c0faa7e74ca2d7b1a34b9d3 (patch) | |
| tree | 3ff5e2687bbc2aebae381264b754d5b85d04fbf7 | |
| parent | ddf6aef69373a9dcd9a938a216fad99e8fddd871 (diff) | |
| download | emacs-22d3d9cf0b4885e14c0faa7e74ca2d7b1a34b9d3.tar.gz | |
(Fregister_ccl_program): Put ccl-program-idx property to NAME.
| -rw-r--r-- | src/ccl.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/ccl.c b/src/ccl.c index 108ede448ad..f3d31cd9a2d 100644 --- a/src/ccl.c +++ b/src/ccl.c @@ -1856,6 +1856,7 @@ Return index number of the registered CCL program.") } XVECTOR (Vccl_program_table)->contents[i] = Fcons (name, ccl_prog); + Fput (name, Qccl_program_idx, make_number (i)); return make_number (i); } |