aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPierre Neidhardt <ambrevar@gmail.com>2017-12-29 22:04:34 +0100
committerPierre Neidhardt <ambrevar@gmail.com>2017-12-29 22:06:59 +0100
commitf586070b598b1a19842212686e88df346f1ebc1f (patch)
tree8f5b4e9b02a9247d34cd9b9122adf7d5f8dbb643
parent1ba1707f398b541baee516a9314b1ae1cc2f5bae (diff)
Define all mode-maps with defvar instead of defconst
-rw-r--r--lisp/emms-browser.el4
-rw-r--r--lisp/emms-mark.el2
-rw-r--r--lisp/emms-metaplaylist-mode.el2
-rw-r--r--lisp/emms-playlist-mode.el2
-rw-r--r--lisp/emms-show-all.el2
5 files changed, 6 insertions, 6 deletions
diff --git a/lisp/emms-browser.el b/lisp/emms-browser.el
index 1f4981a..8aaa601 100644
--- a/lisp/emms-browser.el
+++ b/lisp/emms-browser.el
@@ -438,7 +438,7 @@ Called once for each directory."
(defvar emms-browser-current-filter-name nil
"The name of the current filter in place, if any.")
-(defconst emms-browser-mode-map
+(defvar emms-browser-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "q") 'emms-browser-bury-buffer)
(define-key map (kbd "/") 'emms-isearch-buffer)
@@ -484,7 +484,7 @@ Called once for each directory."
map)
"Keymap for `emms-browser-mode'.")
-(defconst emms-browser-search-mode-map
+(defvar emms-browser-search-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map emms-browser-mode-map)
(define-key map (kbd "q") 'emms-browser-kill-search)
diff --git a/lisp/emms-mark.el b/lisp/emms-mark.el
index 696fe2d..de9d346 100644
--- a/lisp/emms-mark.el
+++ b/lisp/emms-mark.el
@@ -238,7 +238,7 @@ this function collects the result of FUNC."
;;}}}
;;{{{ mode stuff
-(defconst emms-mark-mode-map
+(defvar emms-mark-mode-map
(let ((map (make-sparse-keymap)))
(define-key map "W" 'emms-mark-copy-marked-tracks)
(define-key map "K" 'emms-mark-kill-marked-tracks)
diff --git a/lisp/emms-metaplaylist-mode.el b/lisp/emms-metaplaylist-mode.el
index 4f84a01..819cffb 100644
--- a/lisp/emms-metaplaylist-mode.el
+++ b/lisp/emms-metaplaylist-mode.el
@@ -78,7 +78,7 @@
;;; Keymap
;;; --------------------------------------------------------
-(defconst emms-metaplaylist-mode-map
+(defvar emms-metaplaylist-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map text-mode-map)
(define-key map (kbd "n") 'next-line)
diff --git a/lisp/emms-playlist-mode.el b/lisp/emms-playlist-mode.el
index b042ab8..3d65914 100644
--- a/lisp/emms-playlist-mode.el
+++ b/lisp/emms-playlist-mode.el
@@ -112,7 +112,7 @@ This is true for every invocation of `emms-playlist-mode-go'."
;;; Keys
;;; --------------------------------------------------------
-(defconst emms-playlist-mode-map
+(defvar emms-playlist-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map text-mode-map)
(define-key map (kbd "C-x C-s") 'emms-playlist-save)
diff --git a/lisp/emms-show-all.el b/lisp/emms-show-all.el
index 79af217..8613b68 100644
--- a/lisp/emms-show-all.el
+++ b/lisp/emms-show-all.el
@@ -45,7 +45,7 @@
"Major mode for `emms-show-all'
\\{emms-show-all-mode-map}")
-(defconst emms-show-all-mode-map
+(defvar emms-show-all-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map text-mode-map)
(define-key map (kbd "q") 'emms-show-all-mode-bury-buffer)