* eat.el (eat--t-change-charset): Assert argument
This commit is contained in:
parent
9a5bd15866
commit
b36f923919
1 changed files with 1 additions and 0 deletions
1
eat.el
1
eat.el
|
@ -2296,6 +2296,7 @@ of range, place cursor at the edge of display."
|
|||
"Change character set to CHARSET.
|
||||
|
||||
CHARSET should be one of `g0', `g1', `g2' and `g3'."
|
||||
(cl-assert (memq charset '(g0 g1 g2 g3)))
|
||||
(setf (car (eat--t-term-charset eat--t-term)) charset))
|
||||
|
||||
(defun eat--t-move-before-to-safe ()
|
||||
|
|
Loading…
Add table
Reference in a new issue