branch: externals/prefixed-core
commit 7c59349842977adf3064af2e22488959d13b86cc
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
* prefixed-core.el: Tweak keymap functions
(keymap-make-dense): Rename from `keymap-make`.
(keymap-make): Rename from `keymap-make-sparse`.
(keymap-set-temporary-overlay): Remove, it's obsolete anyway.
---
prefixed-core.el | 15 ++++++++-------
1 file changed, 8 insertions(+), 7 deletions(-)
diff --git a/prefixed-core.el b/prefixed-core.el
index edf236e..b83cf33 100644
--- a/prefixed-core.el
+++ b/prefixed-core.el
@@ -216,26 +216,27 @@
(defalias 'process-stop #'stop-process)
;;;; Keymaps
+(defalias 'keymap-make #'make-sparse-keymap)
(defalias 'keymap-make-composed #'make-composed-keymap)
-(defalias 'keymap-map-sorted #'map-keymap-sorted)
+(defalias 'keymap-make-dense #'make-keymap)
(defalias 'keymap-copy #'copy-keymap)
-(defalias 'keymap-make #'make-keymap)
-(defalias 'keymap-make-sparse #'make-sparse-keymap)
(defalias 'keymap-suppress #'suppress-keymap)
(defalias 'keymap-map #'map-keymap)
+(defalias 'keymap-map-sorted #'map-keymap-sorted)
(defalias 'keymap--map #'map-keymap-internal)
(defalias 'keymap--pop #'internal-pop-keymap)
(defalias 'keymap--push #'internal-push-keymap)
(defalias 'keymap-set-parent #'set-keymap-parent)
+;; FIXME: Not sure if `set-transient-map' belongs in `keymap'!
(defalias 'keymap-set-transient #'set-transient-map)
-(defalias 'keymap-set-temporary-overlay #'set-temporary-overlay-map)
+(defalias 'keymap-accessible #'accessible-keymaps) ;FIXME: badname
+;; FIXME: The ones below get "too long"?
(defalias 'keymap-current-global-map #'current-global-map)
(defalias 'keymap-current-local-map #'current-local-map)
(defalias 'keymap-current-minor-mode-maps #'current-minor-mode-maps)
(defalias 'keymap-current-active-maps #'current-active-maps)
-(defalias 'keymap-use-local-map #'use-local-map)
-(defalias 'keymap-use-global-map #'use-global-map)
-(defalias 'keymap-accessible #'accessible-keymaps)
+(defalias 'keymap-use-local-map #'use-local-map) ;FIXME: setf
+(defalias 'keymap-use-global-map #'use-global-map) ;FIXME: setf
(provide 'prefixed-core)
;;; prefixed-core.el ends here
