Mercurial > emacs
changeset 95832:fc8e5aad9764
(cperl-info-on-command): Use display-pixel-height rather than
x-display-pixel-height.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 12 Jun 2008 03:48:56 +0000 |
parents | c5f85ede892d |
children | 111bfc3b69a7 |
files | lisp/progmodes/cperl-mode.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/cperl-mode.el Thu Jun 12 03:48:15 2008 +0000 +++ b/lisp/progmodes/cperl-mode.el Thu Jun 12 03:48:56 2008 +0000 @@ -6571,7 +6571,7 @@ ;; Non-functioning under OS/2: (if (eq char-height 1) (setq char-height 18)) ;; Title, menubar, + 2 for slack - (- (/ (x-display-pixel-height) char-height) 4))) + (- (/ (display-pixel-height) char-height) 4))) (if (> height max-height) (setq height max-height)) ;;(message "was %s doing %s" iniheight height) (if not-loner