diff options
| author | Erik Naggum <erik@naggum.no> | 1996-01-19 11:24:34 +0000 |
|---|---|---|
| committer | Erik Naggum <erik@naggum.no> | 1996-01-19 11:24:34 +0000 |
| commit | 06115f9d41df9b46be4f7ddd71fd6fcfdc014a62 (patch) | |
| tree | 1d968a6c756b27f827d7a3f80860c1fdfdfaeeda /lisp/emacs-lisp | |
| parent | df07294210c576fffe435122637604d28347953f (diff) | |
| download | emacs-06115f9d41df9b46be4f7ddd71fd6fcfdc014a62.tar.gz emacs-06115f9d41df9b46be4f7ddd71fd6fcfdc014a62.tar.bz2 emacs-06115f9d41df9b46be4f7ddd71fd6fcfdc014a62.zip | |
(pp-eval-expression): Use `frame-width' instead of `screen-width'.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/pp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index f7e3a1ad25c..f7e6afb4952 100644 --- 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))) |