; Fix my previous commit
* test/src/chartab-tests.el (chartab-test-char-table-extra-slot): Fix test.
This commit is contained in:
parent
2d58e0e803
commit
4b6fcb072a
1 changed files with 1 additions and 1 deletions
|
@ -67,7 +67,7 @@
|
|||
;; Use any type with extra slots, e.g. 'case-table.
|
||||
(let ((tbl (make-char-table 'case-table)))
|
||||
(set-char-table-extra-slot tbl 1 'bar)
|
||||
(char-table-extra-slot tbl 1)))
|
||||
(should (eq (char-table-extra-slot tbl 1) 'bar))))
|
||||
|
||||
(provide 'chartab-tests)
|
||||
;;; chartab-tests.el ends here
|
||||
|
|
Loading…
Add table
Reference in a new issue