[elpa] scratch/mheerdegen-preview cdfaec4 35/35: WIP: [el-search] Change default of el-search-use-prefix-key-transient-map to t

[Michael Heerdegen]

branch: scratch/mheerdegen-preview
commit cdfaec4cb1a83a0ca23cbd9cab5de6e87890c0bb
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    WIP: [el-search] Change default of el-search-use-prefix-key-transient-map 
to t
---
 packages/el-search/el-search.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index e556cd9..9d07de6 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -590,7 +590,7 @@ from the prompt."
                  (const :tag "On"  t)
                  (const :tag "Ask" ask)))
 
-(defvar el-search-use-prefix-key-transient-map nil
+(defvar el-search-use-prefix-key-transient-map t
   "Whether el-search should make commands repeatable."
   ;; I originally wanted to make commands repeatable by looking at the
   ;; command keys.  But that got overly complicated: It interfered with
@@ -2081,6 +2081,7 @@ The following bindings are available only when a search 
is active:
 ;;;###autoload
 (defun el-search-install-shift-bindings ()
   (interactive)
+  (setq el-search-use-prefix-key-transient-map nil)
   (el-search-loop-over-bindings #'el-search-shift-bindings-bind-function)
   (define-key el-search-basic-transient-map [C-S-next]  
#'el-search-scroll-down)
   (define-key el-search-basic-transient-map [C-S-prior] #'el-search-scroll-up))