[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 01/01: Fixes: debbugs:17906
From: |
Stefan Monnier |
Subject: |
[elpa] 01/01: Fixes: debbugs:17906 |
Date: |
Thu, 03 Jul 2014 02:13:37 +0000 |
monnier pushed a commit to branch master
in repository elpa.
commit 7e6fe0ba882d10a40699b215f3455c179f982ec1
Author: Stefan Monnier <address@hidden>
Date: Wed Jul 2 22:13:25 2014 -0400
Fixes: debbugs:17906
* packages/nlinum/nlinum.el (nlinum--setup-window): Don't burp in
non-graphic terminals.
---
packages/nlinum/nlinum.el | 16 +++++++++-------
1 files changed, 9 insertions(+), 7 deletions(-)
diff --git a/packages/nlinum/nlinum.el b/packages/nlinum/nlinum.el
index 8719e92..82e274c 100644
--- a/packages/nlinum/nlinum.el
+++ b/packages/nlinum/nlinum.el
@@ -4,7 +4,7 @@
;; Author: Stefan Monnier <address@hidden>
;; Keywords: convenience
-;; Version: 1.4
+;; Version: 1.5
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@@ -72,12 +72,14 @@ Linum mode is a buffer-local minor mode."
(aref (font-info (face-font face)) 2))
(defun nlinum--setup-window ()
- (let ((width (ceiling
- ;; We'd really want to check the widths rather than the
- ;; heights, but it's a start.
- (/ (* nlinum--width 1.0
- (nlinum--face-height 'linum))
- (frame-char-height)))))
+ (let ((width (if (display-graphic-p)
+ (ceiling
+ ;; We'd really want to check the widths rather than the
+ ;; heights, but it's a start.
+ (/ (* nlinum--width 1.0
+ (nlinum--face-height 'linum))
+ (frame-char-height)))
+ nlinum--width)))
(set-window-margins nil (if nlinum-mode width)
(cdr (window-margins)))))