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

* coding.c (Fdefine_coding_system_internal): Use AREF where

Browse source 
argument is known to be a vector.
* fns.c (Flocale_info): Likewise for ASET.
* xselect.c (selection_data_to_lisp_data): Likewise for ASET.
* w32fns.c (w32_parse_hot_key): Likewise for ASIZE and AREF.
This commit is contained in:
Dmitry Antipov 2013-02-07 20:09:04 +04:00
parent fed000725c
commit 9a9d91d9c2
5 changed files with 18 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/coding.c
View file

@ -9783,7 +9783,7 @@ usage: (define-coding-system-internal ...) */)
CHECK_VECTOR (initial);
for (i = 0; i < 4; i++)
{
val = Faref (initial, make_number (i));
val = AREF (initial, i);
if (! NILP (val))
{
struct charset *charset;