>From fa322d82537763f63ee0e21c479c40b89acbc20a Mon Sep 17 00:00:00 2001 From: Alex Branham Date: Thu, 29 Mar 2018 07:08:05 -0500 Subject: [PATCH] Fix TeX-dwim-master * tex.el(TeX-dwim-master): cl-return is much easier to work with if we're already using cl- functions, so convert 'dolist' to 'cl-loop.' --- tex.el | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/tex.el b/tex.el index d9a0b934..7622219b 100644 --- a/tex.el +++ b/tex.el @@ -2395,11 +2395,12 @@ this variable to \"\"." (defun TeX-dwim-master () "Find a likely `TeX-master'." (let ((dir default-directory)) - (dolist (buf (buffer-list)) - (when (with-current-buffer buf - (and (equal dir default-directory) - (stringp TeX-master))) - (cl-return (with-current-buffer buf TeX-master)))))) + (cl-loop for buf in (buffer-list) + until + (when (with-current-buffer buf + (and (equal dir default-directory) + (stringp TeX-master))) + (cl-return (with-current-buffer buf TeX-master)))))) (defun TeX-master-file-ask () "Ask for master file, set `TeX-master' and add local variables." -- 2.16.3