From 755ea4ee927779f9c7912d74b94e821c4ee1a3ee Mon Sep 17 00:00:00 2001 From: Damien Elmes Date: Thu, 15 Jun 2006 02:28:00 +0000 Subject: playlist: enable undo, add extra undo binding darcs-hash:20060615022826-4e3e3-249a0a736f1fc3d97d8536c0281a3323e06b3b15.gz --- emms-playlist-mode.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/emms-playlist-mode.el b/emms-playlist-mode.el index 34b41bb..3c12dcd 100644 --- a/emms-playlist-mode.el +++ b/emms-playlist-mode.el @@ -106,6 +106,7 @@ composed of other playlists." (define-key map (kbd "C-k") 'emms-playlist-mode-kill-track) (define-key map (kbd "C-w") 'emms-playlist-mode-kill) (define-key map (kbd "C-_") 'emms-playlist-mode-undo) + (define-key map (kbd "C-/") 'emms-playlist-mode-undo) (define-key map (kbd "C-n") 'next-line) (define-key map (kbd "C-p") 'previous-line) (define-key map (kbd "C-j") 'emms-playlist-mode-insert-newline) @@ -423,7 +424,8 @@ WINDOW-WIDTH is `emms-playlist-mode-window-width'." (add-text-properties (point-min) (point-max) '(face emms-playlist-track-face))) - (setq buffer-read-only t)) + (setq buffer-read-only t) + (setq buffer-undo-list nil)) ;;;###autoload (defun emms-playlist-mode () -- cgit v1.2.3