(pp-eval-expression): Use `frame-width' instead of `screen-width'.

diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el
index f7e3a1ad25c33dae3d0e26781e113c5801240a28..f7e6afb49521d82f37d118cec65f566536722323 100644 (file)
--- a/lisp/emacs-lisp/pp.el
+++ b/lisp/emacs-lisp/pp.el
@@ -117,7 +117,7 @@ value."
               (goto-char (point-min))
               (end-of-line 1)
               (if (or (< (1+ (point)) (point-max))
-                      (>= (- (point) (point-min)) (screen-width)))
+                      (>= (- (point) (point-min)) (frame-width)))
                   (let ((temp-buffer-show-function old-show-function)
                         (old-selected (selected-window))
                         (window (display-buffer buf)))