[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 825f4fdb51: Fix mode line mouse-1 binding when showing only colum
From: |
Lars Ingebrigtsen |
Subject: |
master 825f4fdb51: Fix mode line mouse-1 binding when showing only column numbers |
Date: |
Sat, 23 Jul 2022 02:03:03 -0400 (EDT) |
branch: master
commit 825f4fdb5159c0957d9749b69d3ec9d73ef9fe95
Author: Miha Rihtaršič <miha@kamnitnik.top>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix mode line mouse-1 binding when showing only column numbers
* lisp/bindings.el (mode-line-position): Fix the mouse-1 binding
when showing only column numbers (bug#56694).
---
lisp/bindings.el | 36 ++++++++++++++++++------------------
1 file changed, 18 insertions(+), 18 deletions(-)
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 1d795c7a30..2e32128274 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -517,31 +517,31 @@ mouse-1: Display Line and Column Mode Menu")
'help-echo "Size indication mode\n\
mouse-1: Display Line and Column Mode Menu")))
(line-number-mode
- ((column-number-mode
- (column-number-indicator-zero-based
- (10
- (:propertize
- mode-line-position-column-line-format
- display (min-width (10.0))
- ,@mode-line-position--column-line-properties))
- (10
- (:propertize
- (:eval (string-replace
- "%c" "%C" (car mode-line-position-column-line-format)))
- display (min-width (10.0))
- ,@mode-line-position--column-line-properties)))
- (6
+ (column-number-mode
+ (column-number-indicator-zero-based
+ (10
(:propertize
- mode-line-position-line-format
- display (min-width (6.0))
- ,@mode-line-position--column-line-properties))))
+ mode-line-position-column-line-format
+ display (min-width (10.0))
+ ,@mode-line-position--column-line-properties))
+ (10
+ (:propertize
+ (:eval (string-replace
+ "%c" "%C" (car mode-line-position-column-line-format)))
+ display (min-width (10.0))
+ ,@mode-line-position--column-line-properties)))
+ (6
+ (:propertize
+ mode-line-position-line-format
+ display (min-width (6.0))
+ ,@mode-line-position--column-line-properties)))
(column-number-mode
(column-number-indicator-zero-based
(6
(:propertize
mode-line-position-column-format
display (min-width (6.0))
- (,@mode-line-position--column-line-properties)))
+ ,@mode-line-position--column-line-properties))
(6
(:propertize
(:eval (string-replace
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 825f4fdb51: Fix mode line mouse-1 binding when showing only column numbers,
Lars Ingebrigtsen <=