diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el
index 8a5c73ebd3a..46fa9d521d7 100644
--- a/lisp/emacs-lisp/warnings.el
+++ b/lisp/emacs-lisp/warnings.el
@@ -214,12 +214,8 @@ warning-suppress-p

 (define-icon warnings-suppress button
   `((emoji "⛔")
-    ;; Many MS-Windows console fonts don't have good glyphs for U+25A0.
-    (symbol ,(if (and (eq system-type 'windows-nt)
-                      (null window-system))
-                 " » "
-               " ■ "))
-    (text " stop "))
+    (symbol " × ")
+    (text " suppress "))
   "Suppress warnings."
   :version "29.1"
   :help-echo "Click to suppress this warning type")