Skip to content

Commit a83b899

Browse files
committed
Fix compilation errors on Emacs-27
* bdx.el (bdx--occur): (bdx-find-definition): Fix compilation errors on Emacs-27.
1 parent 6a3745d commit a83b899

File tree

1 file changed

+3
-2
lines changed

1 file changed

+3
-2
lines changed

bdx.el

Lines changed: 3 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -600,7 +600,8 @@ This turns a string of the form \\='function<type<T>>\\=' into
600600
(insert-row "type" type 'font-lock-type-face)
601601
(insert "\n")))))
602602

603-
(button-mode +1)
603+
(when (fboundp 'button-mode)
604+
(button-mode +1))
604605
(goto-char (point-min)))
605606

606607
(ivy-configure 'bdx :occur #'bdx--occur)
@@ -850,7 +851,7 @@ If SYMBOL-PLIST is the symbol \\='interactive, then prompt for the symbol."
850851
(pop-to-buffer (current-buffer))
851852
(goto-char (point-min))
852853
(forward-line (1- line))
853-
(pulse-momentary-highlight-one-line)
854+
(pulse-momentary-highlight-one-line (point))
854855
(recenter-top-bottom)
855856
(cons file line)))))))
856857

0 commit comments

Comments
 (0)