Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
7de35017
Commit
7de35017
authored
Jan 03, 2003
by
Dave Love
Browse files
(ucs-unify-8859, ucs-fragment-8859):
Call optimize-char-coding-system-table.
parent
237e5993
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
2 deletions
+4
-2
lisp/international/ucs-tables.el
lisp/international/ucs-tables.el
+4
-2
No files found.
lisp/international/ucs-tables.el
View file @
7de35017
...
...
@@ -1202,7 +1202,8 @@ everything on input operations."
;; Update the table of what encodes to what.
(
register-char-codings
coding-system
table
)
(
coding-system-put
coding-system
'translation-table-for-encode
table
)))
(
add-hook
'minibuffer-setup-hook
'ucs-minibuffer-setup
)))
(
add-hook
'minibuffer-setup-hook
'ucs-minibuffer-setup
))
(
optimize-char-coding-system-table
))
(
defun
ucs-fragment-8859
(
for-encode
for-decode
)
"Undo the unification done by `ucs-unify-8859'.
...
...
@@ -1265,7 +1266,8 @@ unification on input operations."
(
set-char-table-parent
safe
nil
))
(
coding-system-put
coding-system
'translation-table-for-encode
nil
)))
(
optimize-char-coding-system-table
)
(
remove-hook
'minibuffer-setup-hook
'ucs-minibuffer-setup
)))
(
remove-hook
'minibuffer-setup-hook
'ucs-minibuffer-setup
))
(
optimize-char-coding-system-table
))
(
defun
ucs-insert
(
arg
)
"Insert the Emacs character representation of the given Unicode.
...
...
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