[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 01/01: * lisp/simple.el (next-line-or-history-eleme
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] master 01/01: * lisp/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. |
Date: |
Tue, 18 Nov 2014 22:23:52 +0000 |
branch: master
commit 4a306d701b0dbe860c8ced70e0d93bd3129f0665
Author: Juri Linkov <address@hidden>
Date: Wed Nov 19 00:23:47 2014 +0200
* lisp/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.
---
lisp/ChangeLog | 7 +++++++
lisp/simple.el | 6 ++++--
2 files changed, 11 insertions(+), 2 deletions(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7763d25..8b7f62a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,12 @@
2014-11-18 Juri Linkov <address@hidden>
+ * 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 <address@hidden>
+
* progmodes/grep.el (grep-compute-defaults):
Compute grep-highlight-matches before its use.
diff --git a/lisp/simple.el b/lisp/simple.el
index fda7040..2a47165 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -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.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 01/01: * lisp/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.,
Juri Linkov <=