diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-18 23:22:36 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-18 23:22:36 +0200 |
| commit | b906ef38fc68ea39b914c89c3c5eab5adfd03a2e (patch) | |
| tree | 8055ec7d65c6e6099478f656c03ab62bf3e4faf8 /lisp/emulation | |
| parent | 556ff983e73251c10d51a5995707058ea1d67965 (diff) | |
| download | emacs-b906ef38fc68ea39b914c89c3c5eab5adfd03a2e.tar.gz | |
Remove some compat code from viper-cmd.el
* lisp/emulation/viper-cmd.el (viper-next-line-at-bol): No need to
check for button-at.
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/viper-cmd.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el index b10a533a77c..5518af4997d 100644 --- a/lisp/emulation/viper-cmd.el +++ b/lisp/emulation/viper-cmd.el @@ -2883,7 +2883,7 @@ If point is on a widget or a button, simulate clicking on that widget/button." (and (consp widget) (get (widget-type widget) 'widget-type)))) (widget-button-press (point)) - (if (and (fboundp 'button-at) (fboundp 'push-button) (button-at (point))) + (if (button-at (point)) (push-button) ;; not a widget or a button (save-excursion |