diff options
| -rw-r--r-- | bard-emacs-modules/bard-emacs-window.el | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/bard-emacs-modules/bard-emacs-window.el b/bard-emacs-modules/bard-emacs-window.el index 15270db..06255e5 100644 --- a/bard-emacs-modules/bard-emacs-window.el +++ b/bard-emacs-modules/bard-emacs-window.el @@ -109,12 +109,15 @@ )) (winner-mode 1) -(define-key global-map (kbd "C-x <right>") #'winner-redo) -(define-key global-map (kbd "C-x <left>") #'winner-undo) -(define-key global-map (kbd "C-x C-n") #'next-buffer) -(define-key global-map (kbd "C-x C-p") #'previous-buffer) -(define-key global-map (kbd "C-x <up>") #'next-buffer) -(define-key global-map (kbd "C-x <down>") #'previous-buffer) +(let ((map global-map)) + (define-key map (kbd "C-x <right>") #'winner-redo) + (define-key map (kbd "C-x <left>") #'winner-undo) + (define-key map (kbd "C-x C-n") #'next-buffer) + (define-key map (kbd "C-x C-p") #'previous-buffer) + (define-key map (kbd "C-x <up>") #'next-buffer) + (define-key map (kbd "C-x <down>") #'previous-buffer)) + +(define-key global-map (kbd "C-x w") #'delete-frame) (provide 'bard-emacs-window) ;;; bard-emacs-window.el ends here |