diff options
| author | Lars Ingebrigtsen | 2019-06-20 14:02:22 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-06-20 14:02:22 +0200 |
| commit | 2c5a3f413b7477544ba8f5b18ed233ea6ab6f2aa (patch) | |
| tree | 69fda244cb01f2038198ac513d5262c02f38749e | |
| parent | 77e8d418a6e50855813f1647c242e2cee53f5083 (diff) | |
| download | emacs-2c5a3f413b7477544ba8f5b18ed233ea6ab6f2aa.tar.gz emacs-2c5a3f413b7477544ba8f5b18ed233ea6ab6f2aa.zip | |
Fix compilation warning in viper-exp involving tags
* lisp/emulation/viper-ex.el (ex-tag): Use xref/next-error instead
of the deprecated tags functions.
| -rw-r--r-- | lisp/emulation/viper-ex.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emulation/viper-ex.el b/lisp/emulation/viper-ex.el index f64960dd753..26bca686cb3 100644 --- a/lisp/emulation/viper-ex.el +++ b/lisp/emulation/viper-ex.el | |||
| @@ -2013,8 +2013,10 @@ Please contact your system administrator. ")))))) | |||
| 2013 | (condition-case conds | 2013 | (condition-case conds |
| 2014 | (progn | 2014 | (progn |
| 2015 | (if (string= tag "") | 2015 | (if (string= tag "") |
| 2016 | (find-tag ex-tag t) | 2016 | ;; If we have an *xref* window, `next-error' will take |
| 2017 | (find-tag-other-window ex-tag)) | 2017 | ;; us to the next definition. |
| 2018 | (next-error) | ||
| 2019 | (xref-find-definitions-other-window ex-tag)) | ||
| 2018 | (viper-change-state-to-vi)) | 2020 | (viper-change-state-to-vi)) |
| 2019 | (error | 2021 | (error |
| 2020 | (viper-change-state-to-vi) | 2022 | (viper-change-state-to-vi) |