[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 07/28: company--window-inner-height: remove, use `window-body-hei
From: |
Dmitry Gutov |
Subject: |
[elpa] 07/28: company--window-inner-height: remove, use `window-body-height' |
Date: |
Wed, 27 Aug 2014 01:26:22 +0000 |
dgutov pushed a commit to branch master
in repository elpa.
commit e7f432480b9aaac4ceb8fc27189c430770cb136e
Author: Dmitry Gutov <address@hidden>
Date: Mon Aug 4 02:38:37 2014 +0400
company--window-inner-height: remove, use `window-body-height'
Available since Emacs 24.1.
Fixes #160
---
company.el | 6 +-----
1 files changed, 1 insertions(+), 5 deletions(-)
diff --git a/company.el b/company.el
index 3f90a48..276e0b4 100644
--- a/company.el
+++ b/company.el
@@ -2359,10 +2359,6 @@ If SHOW-VERSION is non-nil, show the version in the echo
area."
;; show
-(defsubst company--window-inner-height ()
- (let ((edges (window-inside-edges)))
- (- (nth 3 edges) (nth 1 edges))))
-
(defsubst company--window-width ()
(let ((ww (window-body-width)))
;; Account for the line continuation column.
@@ -2382,7 +2378,7 @@ If SHOW-VERSION is non-nil, show the version in the echo
area."
"Calculate the appropriate tooltip height.
Returns a negative number if the tooltip should be displayed above point."
(let* ((lines (company--row))
- (below (- (company--window-inner-height) 1 lines)))
+ (below (- (window-body-height) 1 lines)))
(if (and (< below (min company-tooltip-minimum company-candidates-length))
(> lines below))
(- (max 3 (min company-tooltip-limit lines)))
- [elpa] branch master updated (b6a1a9e -> 2d6cddf), Dmitry Gutov, 2014/08/26
- [elpa] 01/28: company-fill-propertize: tuncate the common part, Dmitry Gutov, 2014/08/26
- [elpa] 03/28: company-dabbrev-minimum-length: change the initvalue and document better, Dmitry Gutov, 2014/08/26
- [elpa] 06/28: Use `window-body-width' instead of the now-alias `window-width', Dmitry Gutov, 2014/08/26
- [elpa] 07/28: company--window-inner-height: remove, use `window-body-height',
Dmitry Gutov <=
- [elpa] 02/28: company-dabbrev--search-buffer: Use `syntax-ppss' to get to the beg of str-or-cmt, Dmitry Gutov, 2014/08/26
- [elpa] 04/28: Remove the "download ERT" logic; should be unused at this point, Dmitry Gutov, 2014/08/26
- [elpa] 08/28: Assign a face for the tooltip search string, Dmitry Gutov, 2014/08/26
- [elpa] 09/28: Merge pull request #164 from holomorph/tooltip-search, Dmitry Gutov, 2014/08/26
- [elpa] 10/28: Mention company-tooltip-search in NEWS, Dmitry Gutov, 2014/08/26
- [elpa] 11/28: Use window-screen-lines when available, Dmitry Gutov, 2014/08/26
- [elpa] 05/28: company--show-inline-p: never ignore case, Dmitry Gutov, 2014/08/26
- [elpa] 12/28: Tweak wording, Dmitry Gutov, 2014/08/26
- [elpa] 13/28: Use `posn-actual-col-row' to determine the current col and row, Dmitry Gutov, 2014/08/26
- [elpa] 14/28: Work around http://debbugs.gnu.org/18285, Dmitry Gutov, 2014/08/26