[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 06/28: Use `window-body-width' instead of the now-alias `window-w
From: |
Dmitry Gutov |
Subject: |
[elpa] 06/28: Use `window-body-width' instead of the now-alias `window-width' |
Date: |
Wed, 27 Aug 2014 01:26:22 +0000 |
dgutov pushed a commit to branch master
in repository elpa.
commit 0233a0c41139c2bfabc4265dfdc7730c6395ce4d
Author: Dmitry Gutov <address@hidden>
Date: Mon Aug 4 02:34:29 2014 +0400
Use `window-body-width' instead of the now-alias `window-width'
---
company.el | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/company.el b/company.el
index 732226a..3f90a48 100644
--- a/company.el
+++ b/company.el
@@ -2364,7 +2364,7 @@ If SHOW-VERSION is non-nil, show the version in the echo
area."
(- (nth 3 edges) (nth 1 edges))))
(defsubst company--window-width ()
- (let ((ww (window-width)))
+ (let ((ww (window-body-width)))
;; Account for the line continuation column.
(when (zerop (cadr (window-fringes)))
(cl-decf ww))
@@ -2579,7 +2579,7 @@ Returns a negative number if the tooltip should be
displayed above point."
(defun company-echo-format ()
- (let ((limit (window-width (minibuffer-window)))
+ (let ((limit (window-body-width (minibuffer-window)))
(len -1)
;; Roll to selection.
(candidates (nthcdr company-selection company-candidates))
@@ -2609,7 +2609,7 @@ Returns a negative number if the tooltip should be
displayed above point."
(defun company-echo-strip-common-format ()
- (let ((limit (window-width (minibuffer-window)))
+ (let ((limit (window-body-width (minibuffer-window)))
(len (+ (length company-prefix) 2))
;; Roll to selection.
(candidates (nthcdr company-selection company-candidates))
- [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 <=
- [elpa] 07/28: company--window-inner-height: remove, use `window-body-height', Dmitry Gutov, 2014/08/26
- [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