aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/emms-tag-editor.el6
1 files changed, 2 insertions, 4 deletions
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))