resolve alias statically

This commit is contained in:
Jean-Philippe Bernardy 2019-08-25 22:18:32 +02:00
parent 86a1d84d41
commit 5b789a6017
6 changed files with 12 additions and 15 deletions

View file

@ -62,8 +62,8 @@
;; w,f
;; where is? find?
(define-key boon-moves-map "w" '("where was?" . boon-backward-search-map))
(define-key boon-moves-map "f" '("find forward" . boon-forward-search-map))
(define-key boon-moves-map "w" '("where was?" . boon-navigate-backward))
(define-key boon-moves-map "f" '("find forward" . boon-navigate-forward))
(define-key boon-moves-map "W" 'boon-qsearch-previous)
(define-key boon-moves-map "F" 'boon-qsearch-next)

View file

@ -9,9 +9,6 @@
(require 'boon-core)
(defalias 'boon-backward-search-map 'boon-navigate-backward)
(defalias 'boon-forward-search-map 'boon-navigate-forward)
(define-prefix-command 'boon-goto-map)
(set-keymap-parent boon-goto-map goto-map)
(set-keymap-parent boon-goto-map goto-map)

View file

@ -59,8 +59,8 @@
;; w,e
;; where is? elsewhere?
(define-key boon-moves-map "w" '("where was?" . boon-backward-search-map))
(define-key boon-moves-map "e" '("elsewhere?" . boon-forward-search-map))
(define-key boon-moves-map "w" '("where was?" . boon-navigate-backward))
(define-key boon-moves-map "e" '("elsewhere?" . boon-navigate-forward))
(define-key boon-moves-map "W" 'boon-qsearch-previous)
(define-key boon-moves-map "E" 'boon-qsearch-next)

View file

@ -59,8 +59,8 @@
;; w,e
;; where is? elsewhere?
(define-key boon-moves-map "w" '("where was?" . boon-backward-search-map))
(define-key boon-moves-map "e" '("elsewhere?" . boon-forward-search-map))
(define-key boon-moves-map "w" '("where was?" . boon-navigate-backward))
(define-key boon-moves-map "e" '("elsewhere?" . boon-navigate-forward))
(define-key boon-moves-map "W" 'boon-qsearch-previous)
(define-key boon-moves-map "E" 'boon-qsearch-next)

View file

@ -592,20 +592,20 @@ Searching for all occurences of a string is bound to the key
Once you have completed a search you can quickly navigate
through the list of searches using the keys
`\\[boon-backward-search-map]' " (boon-mnemonic 'boon-backward-search-map) " and `\\[boon-forward-search-map]' "(boon-mnemonic 'boon-forward-search-map)".
`\\[boon-navigate-backward]' " (boon-mnemonic 'boon-navigate-backward) " and `\\[boon-navigate-forward]' "(boon-mnemonic 'boon-navigate-forward)".
>> Type `\\[occur]' navig <Return>
>> Examine some of the occurences in the buffer using `\\[boon-backward-search-map]' and `\\[boon-forward-search-map]'.
>> Examine some of the occurences in the buffer using `\\[boon-navigate-backward]' and `\\[boon-navigate-forward]'.
>> Type `\\[isearch-forward]' navig <Return>
>> Examine some more of the occurences in the buffer.
The keys `\\[boon-backward-search-map]' and `\\[boon-forward-search-map]' will perform by default `previous-error' and
The keys `\\[boon-navigate-backward]' and `\\[boon-navigate-forward]' will perform by default `previous-error' and
`next-error', which are in fact versatile navigation commands in
Emacs, allowing you to browse not only errors but `occur' or grep
occurences and many other things depending on context. However, additionally, if you
have performed a search using `isearch', `swiper' or
\\[boon-qsearch-next-at-point] and \\[boon-qsearch-previous-at-point], then `\\[boon-backward-search-map]' (backward) and `\\[boon-forward-search-map]'
\\[boon-qsearch-next-at-point] and \\[boon-qsearch-previous-at-point], then `\\[boon-navigate-backward]' (backward) and `\\[boon-navigate-forward]'
will navigate through the matches. Finally, the same keys will
cycle through multiple cursors when they are active.
(Use \\[boon-quit] to exit such contexts.)

View file

@ -53,8 +53,8 @@
;; w,f
;; where is? find?
(define-key boon-moves-map "d" 'boon-backward-search-map)
(define-key boon-moves-map "r" 'boon-forward-search-map)
(define-key boon-moves-map "d" 'boon-navigate-backward)
(define-key boon-moves-map "r" 'boon-navigate-forward)
(define-key boon-moves-map (kbd "D") 'boon-qsearch-previous)
(define-key boon-moves-map (kbd "R") 'boon-qsearch-next)