summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1998-04-20 02:14:57 +0000
committerKenichi Handa <handa@m17n.org>1998-04-20 02:14:57 +0000
commitb23c24408275316812ba77bd167b0fca0a45cd5c (patch)
tree82a4060142c52c730c13590394a5f8641b14a34e
parentd21ca14d4822593ae4a2a11fd75d940fbf057c3d (diff)
downloademacs-b23c24408275316812ba77bd167b0fca0a45cd5c.tar.gz
emacs-b23c24408275316812ba77bd167b0fca0a45cd5c.tar.bz2
emacs-b23c24408275316812ba77bd167b0fca0a45cd5c.zip
(Fregister_ccl_program): Put ccl-program-idx property to NAME.
-rw-r--r--src/ccl.c1
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);
}