mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

Update to Transient v0.4.0

Browse Source 
Or strictly speaking v0.4.0-1-g428576a4.)
This commit is contained in:
Jonas Bernoulli 2023-05-11 17:47:30 +02:00
parent b8bcd42cab
commit 60d5a015d1
No known key found for this signature in database
GPG Key ID: 230C2EFBB326D927
2 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
doc/misc/transient.texi
View File

@ -31,7 +31,7 @@ General Public License for more details.
@finalout @finalout
@titlepage @titlepage
@title Transient User and Developer Manual @title Transient User and Developer Manual
@subtitle for version 0.3.7.50 @subtitle for version 0.4.0
@author Jonas Bernoulli @author Jonas Bernoulli
@page @page
@vskip 0pt plus 1filll @vskip 0pt plus 1filll
@ -74,7 +74,7 @@ that hurdle is Psionic K's interactive tutorial, available at
@end quotation @end quotation
@noindent @noindent
This manual is for Transient version 0.3.7.50. This manual is for Transient version 0.4.0.
@insertcopying @insertcopying
@end ifnottex @end ifnottex

11
lisp/transient.el
View File

@ -6,7 +6,7 @@
;; URL: https://github.com/magit/transient ;; URL: https://github.com/magit/transient
;; Keywords: extensions ;; Keywords: extensions
;; Package-Version: 0.3.7.50 ;; Package-Version: 0.4.0
;; Package-Requires: ((emacs "26.1")) ;; Package-Requires: ((emacs "26.1"))
;; SPDX-License-Identifier: GPL-3.0-or-later ;; SPDX-License-Identifier: GPL-3.0-or-later
@ -3934,8 +3934,13 @@ search instead."
(defun transient-isearch-abort () (defun transient-isearch-abort ()
"Like `isearch-abort' but adapted for `transient'." "Like `isearch-abort' but adapted for `transient'."
(interactive) (interactive)
(condition-case nil (isearch-abort) (quit)) (let ((around (lambda (fn)
(transient--isearch-exit)) (condition-case nil (funcall fn) (quit))
(transient--isearch-exit))))
(advice-add 'isearch-cancel :around around)
(unwind-protect
(isearch-abort)
(advice-remove 'isearch-cancel around))))
(defun transient--isearch-setup () (defun transient--isearch-setup ()
(select-window transient--window) (select-window transient--window)