diff options
| author | Andreas Schwab | 2012-07-11 09:19:44 +0200 |
|---|---|---|
| committer | Andreas Schwab | 2012-07-11 09:19:44 +0200 |
| commit | 34348bd4e5c89fa0e440e37efa20be2a00c8fd9c (patch) | |
| tree | 679635a1ad78cb4068413ebb7080afcbcec31abd /src/minibuf.c | |
| parent | 172bedefc979b19de6799b245e8843f84bfe70b5 (diff) | |
| download | emacs-34348bd4e5c89fa0e440e37efa20be2a00c8fd9c.tar.gz emacs-34348bd4e5c89fa0e440e37efa20be2a00c8fd9c.zip | |
* coding.c (Fdefine_coding_system_internal): Use XCAR/XCDR instead
of Fcar/Fcdr if possible.
* font.c (check_otf_features): Likewise.
* fontset.c (Fnew_fontset): Likewise.
* gnutls.c (Fgnutls_boot): Likewise.
* minibuf.c (read_minibuf): Likewise.
* msdos.c (IT_set_frame_parameters): Likewise.
* xmenu.c (Fx_popup_dialog): Likewise.
* w32menu.c (Fx_popup_dialog): Likewise.
Diffstat (limited to 'src/minibuf.c')
| -rw-r--r-- | src/minibuf.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/minibuf.c b/src/minibuf.c index 27c776857db..7e47be39bc9 100644 --- a/src/minibuf.c +++ b/src/minibuf.c | |||
| @@ -424,7 +424,7 @@ read_minibuf (Lisp_Object map, Lisp_Object initial, Lisp_Object prompt, | |||
| 424 | { | 424 | { |
| 425 | if (CONSP (initial)) | 425 | if (CONSP (initial)) |
| 426 | { | 426 | { |
| 427 | Lisp_Object backup_n = Fcdr (initial); | 427 | Lisp_Object backup_n = XCDR (initial); |
| 428 | initial = XCAR (initial); | 428 | initial = XCAR (initial); |
| 429 | CHECK_STRING (initial); | 429 | CHECK_STRING (initial); |
| 430 | if (!NILP (backup_n)) | 430 | if (!NILP (backup_n)) |