From cf04a44ca7b3414fec2fc1f9335115982a5a303f Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 4 Jan 2020 17:13:05 -0500 Subject: [PATCH] Refactor comment/string check in autoloads generator --- core/cli/autoloads.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/core/cli/autoloads.el b/core/cli/autoloads.el index 2a92ead24..28834aaf8 100644 --- a/core/cli/autoloads.el +++ b/core/cli/autoloads.el @@ -226,11 +226,10 @@ one wants that.") ;; `load-file-name' is meaningless in a concatenated ;; mega-autoloads file, so we replace references to it with the ;; file they came from. - (or (save-excursion - (let ((ppss (syntax-ppss))) - (or (nth 3 ppss) - (nth 4 ppss)))) - (replace-match filestr t t))))) + (let ((ppss (save-excursion (syntax-ppss)))) + (or (nth 3 ppss) + (nth 4 ppss) + (replace-match filestr t t)))))) (let ((load-file-name file) (load-path (append (list doom-private-dir)