From a6baeec15ee331c90907414f0e21592460765ed6 Mon Sep 17 00:00:00 2001 From: Yoni Rabkin Date: Tue, 22 Apr 2014 14:17:02 -0400 Subject: * lisp/emms-tag-editor.el: Use newer paradigm. --- lisp/emms-tag-editor.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'lisp') diff --git a/lisp/emms-tag-editor.el b/lisp/emms-tag-editor.el index 7ce4533..6ed23f2 100644 --- a/lisp/emms-tag-editor.el +++ b/lisp/emms-tag-editor.el @@ -226,8 +226,7 @@ This string is suitable for inserting into the tags buffer." (defsubst emms-tag-editor-erase-buffer (&optional buf) "Erase the buffer BUF, and ensure that it exists." (let ((inhibit-read-only t)) - (save-excursion - (set-buffer (get-buffer-create buf)) + (with-current-buffer (get-buffer-create buf) (erase-buffer)))) (defsubst emms-tag-editor-insert-track (track) @@ -439,8 +438,7 @@ Available tags are: (mapc (lambda (tag) (princ (format "\t%s - %S\n" (cdr tag) (car tag)))) emms-tag-editor-tags) - (save-excursion - (set-buffer standard-output) + (with-current-buffer standard-output (help-mode))))) map)) current-prefix-arg)) -- cgit v1.2.3