diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-04-10 01:50:22 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-04-10 01:50:22 -0400 |
commit | 26f8a384978c6b1d1db1c6b091fa1e51d9ff5a5b (patch) | |
tree | 1009712ed76be8785abbfa2cfb6ddc9359b46ced /lisp/frameset.el | |
parent | 519489089197ce2d41c72e20773438d415ce8564 (diff) | |
download | emacs-26f8a384978c6b1d1db1c6b091fa1e51d9ff5a5b.tar.gz |
cl-lib.el: Partial revert of "2015-04-05 Rationalize c[ad]+r"
* lisp/emacs-lisp/cl-lib.el: Partial revert of "2015-04-05 Rationalize
use of c[ad]+r", so as to keep the "cl-" prefix on all
cl-lib definitions.
Diffstat (limited to 'lisp/frameset.el')
-rw-r--r-- | lisp/frameset.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/frameset.el b/lisp/frameset.el index adff85332a8..17fe39be844 100644 --- a/lisp/frameset.el +++ b/lisp/frameset.el @@ -809,7 +809,7 @@ For the description of FORCE-ONSCREEN, see `frameset-restore'. When forced onscreen, frames wider than the monitor's workarea are converted to fullwidth, and frames taller than the workarea are converted to fullheight. NOTE: This only works for non-iconified frames." - (pcase-let* ((`(,left ,top ,width ,height) (cdadr (frame-monitor-attributes frame))) + (pcase-let* ((`(,left ,top ,width ,height) (cl-cdadr (frame-monitor-attributes frame))) (right (+ left width -1)) (bottom (+ top height -1)) (fr-left (frameset-compute-pos (frame-parameter frame 'left) left right)) |