Don't use old-style backquote in doc/ptexinfmt.el.

[riece] / lisp / riece.el

diff --git a/lisp/riece.el b/lisp/riece.el
index 9936dcd..bce18ad 100644 (file)
--- a/lisp/riece.el
+++ b/lisp/riece.el
@@ -521,9 +521,8 @@ Instead, these commands are available:
 (defun riece-create-buffers ()
   (let ((alist riece-buffer-alist))
     (while alist
-      (save-excursion
-       (set-buffer (apply #'riece-get-buffer-create
-                          (cdr (car alist))))
+      (with-current-buffer (apply #'riece-get-buffer-create
+                                 (cdr (car alist)))
        (set (car (car alist)) (current-buffer))
        (unless (or (null (nth 2 (car alist)))
                    (eq major-mode (nth 2 (car alist))))