diff options
| author | Lars Ingebrigtsen | 2020-08-12 18:56:47 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2020-08-12 18:56:47 +0200 |
| commit | 56a44a882c651dae40bd8de1dc81101b4e87ab54 (patch) | |
| tree | d4c313276a6a8b18a533d1c6d864d0a7a3b0e5eb /lisp/emulation | |
| parent | 9a929de29bcc6ffba9f4f3b07e91587dae5ce61f (diff) | |
| download | emacs-56a44a882c651dae40bd8de1dc81101b4e87ab54.tar.gz emacs-56a44a882c651dae40bd8de1dc81101b4e87ab54.zip | |
Remove some compat code from viper-cmd.el
* lisp/emulation/viper-cmd.el (viper-register-to-point):
frame-configuration-p is always available in Emacs now.
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/viper-cmd.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el index 4c3a9b319b8..77f1b291043 100644 --- a/lisp/emulation/viper-cmd.el +++ b/lisp/emulation/viper-cmd.el | |||
| @@ -4695,8 +4695,7 @@ Please, specify your level now: ")) | |||
| 4695 | (interactive "cViper register to point: ") | 4695 | (interactive "cViper register to point: ") |
| 4696 | (let ((val (get-register char))) | 4696 | (let ((val (get-register char))) |
| 4697 | (cond | 4697 | (cond |
| 4698 | ((and (fboundp 'frame-configuration-p) | 4698 | ((frame-configuration-p val) |
| 4699 | (frame-configuration-p val)) | ||
| 4700 | (set-frame-configuration val)) | 4699 | (set-frame-configuration val)) |
| 4701 | ((window-configuration-p val) | 4700 | ((window-configuration-p val) |
| 4702 | (set-window-configuration val)) | 4701 | (set-window-configuration val)) |