[Emacs-diffs] emacs-26 ac144dc: * lisp/files.el (make-backup-file-name-1): Fix scoping error.

[Michael Albinus]

branch: emacs-26
commit ac144dc835c2a759c96eee0b10c7b2196db3d17f
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    * lisp/files.el (make-backup-file-name-1): Fix scoping error.
---
 lisp/files.el | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/lisp/files.el b/lisp/files.el
index 1bdb6d3..ef4c2ea8 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4673,15 +4673,15 @@ The function `find-backup-file-name' also uses this."
                                       (if (eq (aref file 2) ?/)
                                           ""
                                         "/")
-                                      (substring file 2))))))
-             ;; Make the name unique by substituting directory
-             ;; separators.  It may not really be worth bothering about
-             ;; doubling `!'s in the original name...
-             (expand-file-name
-              (subst-char-in-string
-               ?/ ?!
-               (replace-regexp-in-string "!" "!!" file))
-              backup-directory)))
+                                      (substring file 2)))))))
+           ;; Make the name unique by substituting directory
+           ;; separators.  It may not really be worth bothering about
+           ;; doubling `!'s in the original name...
+           (expand-file-name
+            (subst-char-in-string
+             ?/ ?!
+             (replace-regexp-in-string "!" "!!" file))
+            backup-directory))
        (expand-file-name (file-name-nondirectory file)
                          (file-name-as-directory abs-backup-directory))))))