diff options
Diffstat (limited to 'lisp/emacs-lisp/find-gc.el')
-rw-r--r-- | lisp/emacs-lisp/find-gc.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/find-gc.el b/lisp/emacs-lisp/find-gc.el index 180c3b8a843..1b60b25dc0e 100644 --- a/lisp/emacs-lisp/find-gc.el +++ b/lisp/emacs-lisp/find-gc.el @@ -113,8 +113,7 @@ Also store it in `find-gc-unsafe'." (call-process "csh" nil nil nil "-c" (format "ln -s %s/*.[ch] /tmp/esrc" find-gc-source-directory)))) - (save-excursion - (set-buffer (get-buffer-create "*Trace Call Tree*")) + (with-current-buffer (get-buffer-create "*Trace Call Tree*") (setq find-gc-subrs-called nil) (let ((case-fold-search nil) (files find-gc-source-files) |