procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Quieten lisp/obsolete compilation

Browse source 
* lisp/obsolete/vi.el (vi-mark-region):
* lisp/obsolete/vip.el (vip-delete-backward-char): Silence compiler.
This commit is contained in:
Glenn Morris 2018-03-23 17:05:01 -04:00
parent 1f2602cc5d
commit 7a00aa0222
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/obsolete/vi.el
View file

@ -1386,7 +1386,7 @@ l(ines)."
(interactive "p\nc")
(cond ((char-equal region ?d) (mark-defun))
((char-equal region ?s) (mark-sexp arg))
((char-equal region ?b) (mark-whole-buffer))
((char-equal region ?b) (with-no-warnings (mark-whole-buffer)))
((char-equal region ?p) (mark-paragraph))
((char-equal region ?P) (mark-page arg))
((char-equal region ?f) (c-mark-function))

2
lisp/obsolete/vip.el
View file

@ -1858,7 +1858,7 @@ STRING. Search will be forward if FORWARD, otherwise backward."
(+ vip-use-register 32) (point) (+ (point) val))
(copy-to-register vip-use-register (point) (+ (point) val) nil))
(setq vip-use-register nil)))
(delete-backward-char val t)))
(with-no-warnings (delete-backward-char val t))))
;; join lines.