projects
/
elisp
/
emacs-canna.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(VERSION): Update to 1.2.
[elisp/emacs-canna.git]
/
canna.el
diff --git
a/canna.el
b/canna.el
index
c03d6c6
..
b26a330
100644
(file)
--- a/
canna.el
+++ b/
canna.el
@@
-7,7
+7,7
@@
;; Author: Akira Kon <kon@d1.bs2.mt.nec.co.jp>
;; MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Stephen Turnbull <turnbull@sk.tsukuba.ac.jp>
;; Author: Akira Kon <kon@d1.bs2.mt.nec.co.jp>
;; MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Stephen Turnbull <turnbull@sk.tsukuba.ac.jp>
-;; Version: $Revision: 1.17 $
+;; Version: $Revision: 1.18 $
;; Keywords: Canna, Japanese, input method, mule, multilingual
;; This file is part of Emacs-Canna.
;; Keywords: Canna, Japanese, input method, mule, multilingual
;; This file is part of Emacs-Canna.
@@
-60,7
+60,7
@@
;; end
(defconst canna-rcs-version
;; end
(defconst canna-rcs-version
- "$Id: canna.el,v 1.17 1998-10-26 16:34:32 morioka Exp $")
+ "$Id: canna.el,v 1.18 1998-10-27 09:59:18 morioka Exp $")
(defun canna-version ()
"Display version of canna.el in mini-buffer."
(defun canna-version ()
"Display version of canna.el in mini-buffer."
@@
-850,10
+850,11
@@
kana-to-kanji translation, even if you are in the minibuffer."
canna:*saved-mode-string*
new-mode)))
0)))
canna:*saved-mode-string*
new-mode)))
0)))
- (setq canna:*local-map-backup* (current-local-map))
+ (setq canna:*local-map-backup* (current-local-map))
(setq canna:*fence-mode* t)
;; XEmacs change:
(setq canna:*fence-mode* t)
;; XEmacs change:
- (buffer-disable-undo (current-buffer))
+ ;; (buffer-disable-undo (current-buffer))
+ ;; Original:
;; (if (boundp 'disable-undo)
;; (setq disable-undo canna:*fence-mode*))
(use-local-map canna-mode-map))
;; (if (boundp 'disable-undo)
;; (setq disable-undo canna:*fence-mode*))
(use-local-map canna-mode-map))
@@
-875,7
+876,8
@@
kana-to-kanji translation, even if you are in the minibuffer."
(canna-toggle-japanese-mode)
(mode-line-canna-mode-update canna:*alpha-mode-string*) )))
;; XEmacs change:
(canna-toggle-japanese-mode)
(mode-line-canna-mode-update canna:*alpha-mode-string*) )))
;; XEmacs change:
- (buffer-enable-undo (current-buffer))
+ ;; (buffer-enable-undo (current-buffer))
+ ;; Original:
;; (if (boundp 'disable-undo)
;; (setq disable-undo canna:*fence-mode*))
))
;; (if (boundp 'disable-undo)
;; (setq disable-undo canna:*fence-mode*))
))