branch: externals/auctex
commit 4775f96a522ec1a3948bac6a1b0f52d830aa00a2
Author: Ikumi Keita <[email protected]>
Commit: Ikumi Keita <[email protected]>
; * tex-jp.el (japanese-TeX-self-insert-command): Silence byte compiler.
---
tex-jp.el | 18 +++++++++---------
1 file changed, 9 insertions(+), 9 deletions(-)
diff --git a/tex-jp.el b/tex-jp.el
index 2bd2ff2..017144f 100644
--- a/tex-jp.el
+++ b/tex-jp.el
@@ -520,15 +520,15 @@ overwrite the value already set locally."
;;; Support for various self-insert-command
-(fset 'japanese-TeX-self-insert-command
- (cond ((fboundp 'can-n-egg-self-insert-command)
- #'can-n-egg-self-insert-command)
- ((fboundp 'egg-self-insert-command)
- #'egg-self-insert-command)
- ((fboundp 'canna-self-insert-command)
- #'canna-self-insert-command)
- (t
- #'self-insert-command)))
+(defalias 'japanese-TeX-self-insert-command
+ (cond ((fboundp 'can-n-egg-self-insert-command)
+ #'can-n-egg-self-insert-command)
+ ((fboundp 'egg-self-insert-command)
+ #'egg-self-insert-command)
+ ((fboundp 'canna-self-insert-command)
+ #'canna-self-insert-command)
+ (t
+ #'self-insert-command)))
(defun TeX-insert-punctuation ()
"Insert point or comma, cleaning up preceding space."
