Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
88f698d9
Commit
88f698d9
authored
Jan 12, 2007
by
Kenichi Handa
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(ucs-input-method): Signal an error for a
Unicode character that is not yet supported.
parent
37370cea
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
14 additions
and
5 deletions
+14
-5
leim/ChangeLog
leim/ChangeLog
+5
-0
leim/quail/uni-input.el
leim/quail/uni-input.el
+9
-5
No files found.
leim/ChangeLog
View file @
88f698d9
2007
-
01
-
12
Kenichi
Handa
<
handa
@
m17n
.
org
>
*
quail
/
uni
-
input
.
el
(
ucs
-
input
-
method
):
Signal
an
error
for
a
Unicode
character
that
is
not
yet
supported
.
2006
-
12
-
26
Andreas
Schwab
<
schwab
@
suse
.
de
>
*
Makefile
.
in
(
datarootdir
):
Define
.
...
...
leim/quail/uni-input.el
View file @
88f698d9
...
...
@@ -107,13 +107,17 @@
(
let*
((
n
(
string-to-number
(
apply
'string
(
cdr
(
nreverse
events
)))
16
))
(
c
(
decode-char
'ucs
n
))
(
status
(
make-vector
9
nil
)))
(
c
(
decode-char
'ucs
n
)))
(
if
c
(
list
c
)
(
aset
status
0
n
)
(
string-to-list
(
ccl-execute-on-string
'utf-8-ccl-encode
status
""
))))))
;; The intention of the following code is to insert
;; a correct UTF-8 sequence by raw bytes, but
;; currently it doesn't work.
;; (let ((status (make-vector 9 nil)))
;; (aset status 0 n)
;; (string-to-list (ccl-execute-on-string
;; 'utf-8-ccl-encode status "")))
(
error
"Character U+%04X is not yet supported"
n
)))))
(
quail-delete-overlays
)
(
set-buffer-modified-p
modified-p
)
(
run-hooks
'input-method-after-insert-chunk-hook
)))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment