emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-27 cd4f75b: Rename default function to next-error-buffer-unnavigat


From: Juri Linkov
Subject: emacs-27 cd4f75b: Rename default function to next-error-buffer-unnavigated-current (bug#40919)
Date: Tue, 16 Jun 2020 19:14:22 -0400 (EDT)

branch: emacs-27
commit cd4f75bb86e160158786b0d5a07319a49c3ad7b8
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    Rename default function to next-error-buffer-unnavigated-current (bug#40919)
    
    * lisp/simple.el (next-error-find-buffer-function): Rename default function
    from next-error-no-navigation-try-current
    to next-error-buffer-unnavigated-current.
---
 lisp/simple.el | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 1555b37..e4958de 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -199,7 +199,7 @@ rejected, and the function returns nil."
           (and extra-test-inclusive
                (funcall extra-test-inclusive))))))
 
-(defcustom next-error-find-buffer-function 
#'next-error-no-navigation-try-current
+(defcustom next-error-find-buffer-function 
#'next-error-buffer-unnavigated-current
   "Function called to find a `next-error' capable buffer.
 This functions takes the same three arguments as the function
 `next-error-find-buffer', and should return the buffer to be
@@ -212,7 +212,7 @@ all other buffers."
                  (const :tag "Single next-error capable buffer on selected 
frame"
                         next-error-buffer-on-selected-frame)
                  (const :tag "Current buffer if next-error capable and outside 
navigation"
-                        next-error-no-navigation-try-current)
+                        next-error-buffer-unnavigated-current)
                  (function :tag "Other function"))
   :group 'next-error
   :version "27.1")
@@ -242,10 +242,9 @@ from which next-error navigated, and a target buffer 
TO-BUFFER."
     (if (eq (length window-buffers) 1)
         (car window-buffers))))
 
-(defun next-error-no-navigation-try-current (&optional
-                                             avoid-current
-                                             extra-test-inclusive
-                                             extra-test-exclusive)
+(defun next-error-buffer-unnavigated-current (&optional avoid-current
+                                                        extra-test-inclusive
+                                                        extra-test-exclusive)
   "Try the current buffer when outside navigation.
 But return nil if we navigated to the current buffer by the means
 of `next-error' command.  Othewise, return it if it's next-error



reply via email to

[Prev in Thread] Current Thread [Next in Thread]