master e88d91b1d2: Remove unused lexvar in subr-x-tests.el

[Basil L. Contovounesios]

branch: master
commit e88d91b1d2f94b21bd5560670c575069164aff05
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>

    Remove unused lexvar in subr-x-tests.el
    
    * test/lisp/emacs-lisp/subr-x-tests.el
    (test-with-buffer-unmodified-if-unchanged): Pacify unused lexvar
    byte-compiler warning.  Simplify slightly and reindent.
---
 test/lisp/emacs-lisp/subr-x-tests.el | 24 +++++++++++-------------
 1 file changed, 11 insertions(+), 13 deletions(-)

diff --git a/test/lisp/emacs-lisp/subr-x-tests.el 
b/test/lisp/emacs-lisp/subr-x-tests.el
index dca7df6309..7f3916c2c0 100644
--- a/test/lisp/emacs-lisp/subr-x-tests.el
+++ b/test/lisp/emacs-lisp/subr-x-tests.el
@@ -722,28 +722,26 @@
     (with-buffer-unmodified-if-unchanged
       (insert "t")
       (delete-char -1))
-    (should (not (buffer-modified-p))))
+    (should-not (buffer-modified-p)))
 
   ;; Shouldn't error.
   (should
    (with-temp-buffer
-     (let ((inner (current-buffer)))
-       (with-buffer-unmodified-if-unchanged
-         (insert "t")
-         (delete-char -1)
-         (kill-buffer (current-buffer))
-         t))))
+     (with-buffer-unmodified-if-unchanged
+       (insert "t")
+       (delete-char -1)
+       (kill-buffer))))
 
   (with-temp-buffer
     (let ((outer (current-buffer)))
       (with-temp-buffer
         (let ((inner (current-buffer)))
-        (with-buffer-unmodified-if-unchanged
-          (insert "t")
-          (delete-char -1)
-          (set-buffer outer))
-        (with-current-buffer inner
-          (should (not (buffer-modified-p)))))))))
+          (with-buffer-unmodified-if-unchanged
+            (insert "t")
+            (delete-char -1)
+            (set-buffer outer))
+          (with-current-buffer inner
+            (should-not (buffer-modified-p))))))))
 
 
 (provide 'subr-x-tests)