diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-25 18:31:36 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-25 18:31:36 +0000 |
| commit | d7b10f4c2efd05dfeb9526686cb76e1df70527bb (patch) | |
| tree | 900c2b3b9469bd8113c66e9bdc3c561944a2ea02 /src/frame.c | |
| parent | 4972c36128d52df96dbb441a2785247fffe419db (diff) | |
| download | emacs-d7b10f4c2efd05dfeb9526686cb76e1df70527bb.tar.gz | |
(Fmodify_frame_parameters, x_set_frame_parameters): Use XCAR/XCDR.
Diffstat (limited to 'src/frame.c')
| -rw-r--r-- | src/frame.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/frame.c b/src/frame.c index b163be53f77..35d00e51552 100644 --- a/src/frame.c +++ b/src/frame.c @@ -2573,11 +2573,11 @@ enabled such bindings for that variable with `make-variable-frame-local'. */) /* Extract parm names and values into those vectors. */ i = 0; - for (tail = alist; CONSP (tail); tail = Fcdr (tail)) + for (tail = alist; CONSP (tail); tail = XCDR (tail)) { Lisp_Object elt; - elt = Fcar (tail); + elt = XCAR (tail); parms[i] = Fcar (elt); values[i] = Fcdr (elt); i++; @@ -2956,11 +2956,11 @@ x_set_frame_parameters (f, alist) /* Extract parm names and values into those vectors. */ i = 0; - for (tail = alist; CONSP (tail); tail = Fcdr (tail)) + for (tail = alist; CONSP (tail); tail = XCDR (tail)) { Lisp_Object elt; - elt = Fcar (tail); + elt = XCAR (tail); parms[i] = Fcar (elt); values[i] = Fcdr (elt); i++; |