[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] GNU AUCTeX branch, master, updated. d81321326b9a547be168b
From: |
Ikumi Keita |
Subject: |
[AUCTeX-diffs] GNU AUCTeX branch, master, updated. d81321326b9a547be168bfecee7165ffd58e32c8 |
Date: |
Tue, 22 Jun 2021 01:26:23 -0400 (EDT) |
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".
The branch, master has been updated
via d81321326b9a547be168bfecee7165ffd58e32c8 (commit)
from 30a7d81b4ecfbce248a5531fe47fbfb57b239b3d (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit d81321326b9a547be168bfecee7165ffd58e32c8
Author: Ikumi Keita <ikumi@ikumi.que.jp>
Date: Tue Jun 22 00:20:29 2021 +0900
Improve tool bar appearance
* toolbar-x.el (toolbarx-emacs-add-button): Use built-in separator.
Add :vert-only property to suppress labels unless vertical alignment
is specified for labels.
Reindent the codes.
* preview.el.in (preview-mode-setup): Add :vert-only property as well.
diff --git a/preview.el.in b/preview.el.in
index cd3825e..fd92a2c 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -3068,7 +3068,8 @@ pp")
(define-key LaTeX-mode-map [tool-bar preview]
`(menu-item "Preview at point" preview-at-point
:image ,preview-tb-icon
- :help "Preview on/off at point")))
+ :help "Preview on/off at point"
+ :vert-only t)))
(when buffer-file-name
(let* ((filename (expand-file-name buffer-file-name))
format-cons)
diff --git a/toolbar-x.el b/toolbar-x.el
index d95ca59..8f07bea 100644
--- a/toolbar-x.el
+++ b/toolbar-x.el
@@ -1116,19 +1116,22 @@ function `toolbar-install-toolbar'."
(cadr (memq :visible filtered-props))))
(button (cons (memq :button filtered-props)
(cadr (memq :button filtered-props))))
- (menuitem (append
- (list 'menu-item
- (toolbarx-make-string-from-symbol symbol)
- command
- :image image-descriptor)
- (when (car help)
- (list :help (cdr help)))
- (when (car enable)
- (list :enable (cdr enable)))
- (when (car visible)
- (list :visible (cdr visible)))
- (when (car button)
- (list :button (cdr button)))))
+ (menuitem (if (eq symbol 'separator)
+ '(menu-item "--")
+ (append
+ (list 'menu-item
+ (toolbarx-make-string-from-symbol symbol)
+ command
+ :image image-descriptor)
+ (when (car help)
+ (list :help (cdr help)))
+ (when (car enable)
+ (list :enable (cdr enable)))
+ (when (car visible)
+ (list :visible (cdr visible)))
+ (when (car button)
+ (list :button (cdr button)))
+ '(:vert-only t))))
(key-not-used
(let* ((count 0)
(symb symbol))
-----------------------------------------------------------------------
Summary of changes:
preview.el.in | 3 ++-
toolbar-x.el | 29 ++++++++++++++++-------------
2 files changed, 18 insertions(+), 14 deletions(-)
hooks/post-receive
--
GNU AUCTeX
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [AUCTeX-diffs] GNU AUCTeX branch, master, updated. d81321326b9a547be168bfecee7165ffd58e32c8,
Ikumi Keita <=