[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 729338b 2/3: Fix off-by-1 error causing the beacon to wrap
|
From: |
Artur Malabarba |
|
Subject: |
[elpa] master 729338b 2/3: Fix off-by-1 error causing the beacon to wrap lines |
|
Date: |
Tue, 17 Oct 2017 19:01:03 -0400 (EDT) |
branch: master
commit 729338b02a0e331a4faf475da9f54771a3470106
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
Fix off-by-1 error causing the beacon to wrap lines
---
beacon.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/beacon.el b/beacon.el
index b69cc67..f3cdea9 100644
--- a/beacon.el
+++ b/beacon.el
@@ -238,7 +238,7 @@ The property's value is a string of spaces with background
COLORS applied to each one."
;; The after-string must not be longer than the remaining columns
;; from point to right window-end else it will be wrapped around.
- (let ((colors (seq-take colors (- (window-width) (current-column)))))
+ (let ((colors (seq-take colors (- (window-width) (current-column) 1))))
(beacon--ov-put-after-string (beacon--make-overlay 0) colors)))
(defun beacon--ov-at-point ()