mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 08:11:05 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/emacs-lisp/cl-lib.el (current-case-table): Remove setter.

Browse source 
* lisp/leim/quail/sisheng.el (sisheng-list): Use with-case-table.
This commit is contained in:
Stefan Monnier 2014-04-12 15:30:14 -04:00
parent e0af409500
commit 6c2453e038
4 changed files with 34 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lisp/emacs-lisp/cl-lib.el
View file

@ -625,7 +625,6 @@ If ALIST is non-nil, the new pairs are prepended to it."
`(insert (prog1 ,store (erase-buffer))))
(gv-define-simple-setter buffer-substring cl--set-buffer-substring)
(gv-define-simple-setter current-buffer set-buffer)
(gv-define-simple-setter current-case-table set-case-table)
(gv-define-simple-setter current-column move-to-column t)
(gv-define-simple-setter current-global-map use-global-map t)
(gv-define-setter current-input-mode (store)