consult-push-button: Replace newlines with spaces in the button label

diff --git a/.emacs.d/esy.org b/.emacs.d/esy.org
index 979c9d54f508d9b91178c2ac0cd3b9d52428bfc4..fc0885aba04e25fcf237ebbc14a8041d72849354 100644 (file)
--- a/.emacs.d/esy.org
+++ b/.emacs.d/esy.org
@@ -1317,8 +1317,11 @@ Add the timezones of places of interest to the list of clocks shown by
                 (buttons nil))
             (while button
               (setq buttons
-                    (cons `(,(concat (truncate-string-to-width (button-label button)
-                                                               64 nil ?\s t)
+                    (cons `(,(concat (truncate-string-to-width
+                                      (string-replace "\n"
+                                                      " "
+                                                      (button-label button))
+                                      64 nil ?\s t)
                                      " "
                                      (propertize (format "[%d]" index) 'invisible t))
                             .