[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101464: Fix bug #6933 regarding `hal
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101464: Fix bug #6933 regarding `half' width fringes. |
Date: |
Fri, 17 Sep 2010 23:07:57 +0200 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101464
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Fri 2010-09-17 23:07:57 +0200
message:
Fix bug #6933 regarding `half' width fringes.
fringe.el (fringe-mode, fringe-query-style): Use 4 pixels, not
5, for `half' width fringes. (Bug#6933)
modified:
lisp/ChangeLog
lisp/fringe.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-09-17 14:31:06 +0000
+++ b/lisp/ChangeLog 2010-09-17 21:07:57 +0000
@@ -1,3 +1,8 @@
+2010-09-17 Eli Zaretskii <address@hidden>
+
+ * fringe.el (fringe-mode, fringe-query-style): Use 4 pixels, not
+ 5, for `half' width fringes. (Bug#6933)
+
2010-09-17 Stefan Monnier <address@hidden>
* emacs-lisp/bytecomp.el (byte-compile-file-form-defvar)
=== modified file 'lisp/fringe.el'
--- a/lisp/fringe.el 2010-08-29 16:17:13 +0000
+++ b/lisp/fringe.el 2010-09-17 21:07:57 +0000
@@ -153,7 +153,7 @@
(const :tag "No fringes" 0)
(const :tag "Only right" (0 . nil))
(const :tag "Only left" (nil . 0))
- (const :tag "Half width" (5 . 5))
+ (const :tag "Half width" (4 . 4))
(const :tag "Minimal" (1 . 1))
(integer :tag "Specific width")
(cons :tag "Different left/right sizes"
@@ -187,7 +187,7 @@
((eq mode 'default) nil)
((eq mode 'left-only) '(nil . 0))
((eq mode 'right-only) '(0 . nil))
- ((eq mode 'half) '(5 . 5))
+ ((eq mode 'half) '(4 . 4))
((eq mode 'minimal) '(1 . 1))
((eq mode (intern ""))
(if (eq 0 (cdr (assq 'left-fringe
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101464: Fix bug #6933 regarding `half' width fringes.,
Eli Zaretskii <=