diff options
author | Glenn Morris <[email protected]> | 2008-06-12 03:48:56 +0000 |
---|---|---|
committer | Glenn Morris <[email protected]> | 2008-06-12 03:48:56 +0000 |
commit | d431decb9e2adf046fbf833a066fbf597074b311 (patch) | |
tree | d1174c1113ba8401ef6818c72c00c7ac795c44e5 | |
parent | 575b6746370055b271a0b2133584b7b022192515 (diff) |
(cperl-info-on-command): Use display-pixel-height rather than
x-display-pixel-height.
-rw-r--r-- | lisp/progmodes/cperl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index e07050c571..13c3d37b79 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -6571,7 +6571,7 @@ Customized by setting variables `cperl-shrink-wrap-info-frame', ;; 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 |