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

* lisp/simple.el (next-line-or-history-element): Wrap next-line in with-no-warnings.

Browse source 
(previous-line-or-history-element): Wrap previous-line in with-no-warnings.
This commit is contained in:
Juri Linkov 2014-11-19 00:23:47 +02:00
parent 239aa11e1e
commit 4a306d701b
2 changed files with 11 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/ChangeLog
View file

@ -1,3 +1,10 @@
2014-11-18 Juri Linkov <juri@linkov.net>
* simple.el (next-line-or-history-element): Wrap next-line
in with-no-warnings.
(previous-line-or-history-element): Wrap previous-line
in with-no-warnings.
2014-11-18 Juri Linkov <juri@linkov.net>
* progmodes/grep.el (grep-compute-defaults):

6
lisp/simple.el
View file

@ -1992,7 +1992,8 @@ next element of the minibuffer history in the minibuffer."
(or arg (setq arg 1))
(let ((old-point (point)))
(condition-case nil
(next-line arg)
(with-no-warnings
(next-line arg))
(end-of-buffer
;; Restore old position since `line-move-visual' moves point to
;; the end of the line when it fails to go to the next line.
@ -2007,7 +2008,8 @@ previous element of the minibuffer history in the minibuffer."
(or arg (setq arg 1))
(let ((old-point (point)))
(condition-case nil
(previous-line arg)
(with-no-warnings
(previous-line arg))
(beginning-of-buffer
;; Restore old position since `line-move-visual' moves point to
;; the beginning of the line when it fails to go to the previous line.