[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] scratch/hyperbole 99519e4e98 11/15: * hycontrol.el (hycontrol-win
From: |
Stefan Monnier |
Subject: |
[elpa] scratch/hyperbole 99519e4e98 11/15: * hycontrol.el (hycontrol-windows-mode-map): Don't autoload |
Date: |
Wed, 24 May 2023 10:06:17 -0400 (EDT) |
branch: scratch/hyperbole
commit 99519e4e98a79dd3d0cd3a661ded94c4ebe68821
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* hycontrol.el (hycontrol-windows-mode-map): Don't autoload
Copying this whole keymap definition to `hyperbole-autoloads.el` just
slows down startup unnecessarily.
---
hycontrol.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/hycontrol.el b/hycontrol.el
index 88139e0684..f164619014 100644
--- a/hycontrol.el
+++ b/hycontrol.el
@@ -359,7 +359,7 @@ The final predicate should always be t, for default values,
typically of zero.")
;;;###autoload
(eval-after-load "dired" '(define-key dired-mode-map "@"
'hycontrol-windows-grid))
-;;;###autoload
+
(defvar hycontrol-windows-mode-map
(let ((map (make-sparse-keymap)))
(suppress-keymap map t) ;; Disable self-inserting keys and prefix keys
@@ -428,11 +428,11 @@ The final predicate should always be t, for default
values, typically of zero.")
;; Don't call these interactively because a prefix arg of 1 tries
;; to make one window 1 line tall.
- (define-key map "\[" (lambda () (interactive)
(split-window-vertically)))
- (define-key map "\]" (lambda () (interactive)
(split-window-horizontally)))
+ (define-key map "[" (lambda () (interactive) (split-window-vertically)))
+ (define-key map "]" (lambda () (interactive)
(split-window-horizontally)))
- (define-key map "\(" 'hycontrol-save-frame-configuration)
- (define-key map "\)" 'hycontrol-restore-frame-configuration)
+ (define-key map "(" 'hycontrol-save-frame-configuration)
+ (define-key map ")" 'hycontrol-restore-frame-configuration)
(define-key map "~" (lambda () (interactive)
(unless (hycontrol-window-swap-buffers)
- [elpa] branch scratch/hyperbole created (now f47880579f), Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole 4467b0a850 01/15: * hload-path.el (hyperb:dir): Use `macroexp-file-name`, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole b482b48c68 06/15: Fix compilation of test file, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole 99519e4e98 11/15: * hycontrol.el (hycontrol-windows-mode-map): Don't autoload,
Stefan Monnier <=
- [elpa] scratch/hyperbole e870f86331 12/15: * hui-select.el: Fix a few warnings and improve some docstrings, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole aa1562a614 14/15: Fix a few minor miscompilations and warnings, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole e126a76e8f 02/15: * hversion.el (hyperb:path-being-loaded): Delete function, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole b7e91d9f63 03/15: Try and avoid using `hyperb:stack-frame`, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole 46d71b2228 09/15: * hyperbole.el: Preload `kotl-autoloads`, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole 5949c75121 13/15: (man-show): Fix miscompilation, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole d1a27a6853 05/15: Get rid of `hyperb:stack-frame`, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole f47880579f 15/15: * hyrolo.el: A few cosmetic tweaks, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole 793e1a4254 04/15: (kotl-mode:pre-self-insert-command): Use buffer-locally at top-level, Stefan Monnier, 2023/05/24
- [elpa] scratch/hyperbole 944dc22293 10/15: hyperbole-autoloads.el: Remove needless definitions, Stefan Monnier, 2023/05/24