summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Fitzsimmons <fitzsim@fitzsim.org>2022-04-21 17:24:29 -0400
committerThomas Fitzsimmons <fitzsim@fitzsim.org>2022-04-21 17:24:29 -0400
commit390b637eed8eba29d0dc710a155a1e0b00f26e0b (patch)
tree1d1fa968d2c4295b19726307c34ee9e89ea3b88f
parentf8aa771af3061ceb68aafacd55e8e9e048853f5d (diff)
downloademacs-390b637eed8eba29d0dc710a155a1e0b00f26e0b.tar.gz
EUDC: Handle nil BOB button label
* lisp/net/eudc-bob.el (eudc-bob-make-button): Do not throw error when label is nil.
-rw-r--r--lisp/net/eudc-bob.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/eudc-bob.el b/lisp/net/eudc-bob.el
index 6a2cd13dd03..f543678fa2d 100644
--- a/lisp/net/eudc-bob.el
+++ b/lisp/net/eudc-bob.el
@@ -124,7 +124,7 @@ LABEL."
(let (overlay
(p (point))
prop val)
- (insert label)
+ (insert (or label ""))
(put-text-property p (point) 'face 'bold)
(setq overlay (make-overlay p (point)))
(overlay-put overlay 'mouse-face 'highlight)