unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#40990: Improve message-mode and isearch icons
@ 2020-04-30 23:50 Dmitry Gutov
  2020-05-01  6:16 ` Eli Zaretskii
  0 siblings, 1 reply; 13+ messages in thread
From: Dmitry Gutov @ 2020-04-30 23:50 UTC (permalink / raw)
  To: 40990

[-- Attachment #1: Type: text/plain, Size: 1561 bytes --]

As discussed previously in the "Why is emacs so square?" thread, here's
a couple of patches that improve the toolbar icons in GTK builds.

Attached are several screenshots from my machine: isearch toolbar with
the x-gtk-stock-map patch and without (the difference is one icon), and
message-mode toolbar without the patch, with the patch, and also with
the extra patch that makes message-tool-bar-retro use the standrd
"mail/send" icon instead of the Gnus-specific one. Fixing Emacs not to
use message-tool-bar-retro is left as a future exercise.

I'd like to present a few arguments for the inclusion of the
x-gtk-stock-map patch in Emacs 27 (on which the current answer is no,
but I'll try to elaborate):

1. With it, the answer to the question "why does everybody tell the new
users to turn off toolbars" becomes less obvious, at least in GTK based
environments.

2. This only affects GTK. And also, if a theme doesn't contain the "new"
replacement image, the previous one will be shown instead.

3. Since "everybody" turns off the toolbars now, the risk of complaints
is pretty low. By the same token, we could de-prioritize said complaints
even if they appear, given that for most people the improvement is most
likely obvious (feedback welcome).

The second patch is a tiny bit more risky, but honestly, since it uses
an icon apparently borrowed from some old GTK-related icon set, using a
new version of the same icon shouldn't bother most people. But this
patch *can* affect users on different toolkits and different platforms
(again, feedback welcome).

[-- Attachment #2: message-tool-bar-retro.diff --]
[-- Type: text/x-patch, Size: 473 bytes --]

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index adefa0efd6..62cbc754bd 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -7983,7 +7983,7 @@ message-tool-bar-gnome
 
 (defcustom message-tool-bar-retro
   '(;; Old Emacs 21 icon for consistency.
-    (message-send-and-exit "gnus/mail-send")
+    (message-send-and-exit "mail/send")
     (message-kill-buffer "close")
     (message-dont-send "cancel")
     (mml-attach-file "attach" mml-mode-map)

[-- Attachment #3: x-gtk-stock-map.diff --]
[-- Type: text/x-patch, Size: 2199 bytes --]

diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 5b8feb14a5..d7bc64fa52 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -1407,13 +1407,13 @@ x-gtk-stock-map
     ("etc/images/right-arrow" . ("go-next" "gtk-go-forward"))
     ("etc/images/home" . ("go-home" "gtk-home"))
     ("etc/images/jump-to" . ("go-jump" "gtk-jump-to"))
-    ("etc/images/index" . "gtk-index")
+    ("etc/images/index" . ("gtk-search" "gtk-index"))
     ("etc/images/exit" . ("application-exit" "gtk-quit"))
     ("etc/images/cancel" . "gtk-cancel")
     ("etc/images/info" . ("dialog-information" "gtk-info"))
     ("etc/images/bookmark_add" . "n:bookmark_add")
     ;; Used in Gnus and/or MH-E:
-    ("etc/images/attach" . "gtk-attach")
+    ("etc/images/attach" . ("mail-attachment" "gtk-attach"))
     ("etc/images/connect" . "gtk-connect")
     ("etc/images/contact" . "gtk-contact")
     ("etc/images/delete" . ("edit-delete" "gtk-delete"))
@@ -1425,12 +1425,14 @@ x-gtk-stock-map
     ("etc/images/lock" . "gtk-lock")
     ("etc/images/next-page" . "gtk-next-page")
     ("etc/images/refresh" . ("view-refresh" "gtk-refresh"))
+    ("etc/images/search-replace" . "edit-find-replace")
     ("etc/images/sort-ascending" . ("view-sort-ascending" "gtk-sort-ascending"))
     ("etc/images/sort-column-ascending" . "gtk-sort-column-ascending")
     ("etc/images/sort-criteria" . "gtk-sort-criteria")
     ("etc/images/sort-descending" . ("view-sort-descending"
 				     "gtk-sort-descending"))
     ("etc/images/sort-row-ascending" . "gtk-sort-row-ascending")
+    ("etc/images/spell" . ("tools-check-spelling" "gtk-spell-check"))
     ("images/gnus/toggle-subscription" . "gtk-task-recurring")
     ("images/mail/compose" . "gtk-mail-compose")
     ("images/mail/copy" . "gtk-mail-copy")
@@ -1442,7 +1444,7 @@ x-gtk-stock-map
     ("images/mail/reply-all" . "gtk-mail-reply-to-all")
     ("images/mail/reply" . "gtk-mail-reply")
     ("images/mail/save-draft" . "gtk-mail-handling")
-    ("images/mail/send" . "gtk-mail-send")
+    ("images/mail/send" . ("mail-send" "gtk-mail-send"))
     ("images/mail/spam" . "gtk-spam")
     ;; Used for GDB Graphical Interface
     ("images/gud/break" . "gtk-no")

[-- Attachment #4: isearch-icons-new.png --]
[-- Type: image/png, Size: 22249 bytes --]

[-- Attachment #5: isearch-icons-old.png --]
[-- Type: image/png, Size: 27019 bytes --]

[-- Attachment #6: message-mode-icons-new.png --]
[-- Type: image/png, Size: 33060 bytes --]

[-- Attachment #7: message-mode-icons-new-with-extra-patch.png --]
[-- Type: image/png, Size: 32123 bytes --]

[-- Attachment #8: message-mode-icons-old.png --]
[-- Type: image/png, Size: 33823 bytes --]

^ permalink raw reply related	[flat|nested] 13+ messages in thread

end of thread, other threads:[~2020-05-11 15:53 UTC | newest]

Thread overview: 13+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2020-04-30 23:50 bug#40990: Improve message-mode and isearch icons Dmitry Gutov
2020-05-01  6:16 ` Eli Zaretskii
2020-05-01 15:21   ` Dmitry Gutov
2020-05-01 15:43     ` Eli Zaretskii
2020-05-01 15:49       ` Eli Zaretskii
2020-05-01 22:12       ` Dmitry Gutov
2020-05-02  6:23         ` Eli Zaretskii
2020-05-11  1:42           ` Dmitry Gutov
2020-05-11  2:35             ` Eli Zaretskii
2020-05-11  2:46               ` Dmitry Gutov
2020-05-11  4:17                 ` Eli Zaretskii
2020-05-11 14:18                   ` Dmitry Gutov
2020-05-11 15:53                     ` Eli Zaretskii

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).