emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/phps-mode 08e1325 74/96: Test of parser not dependent o


From: Christian Johansson
Subject: [elpa] externals/phps-mode 08e1325 74/96: Test of parser not dependent on buffer name
Date: Fri, 29 Oct 2021 11:14:54 -0400 (EDT)

branch: externals/phps-mode
commit 08e1325f92fd21e309c8db14db21da603e2fd7f3
Author: Christian Johansson <christian@cvj.se>
Commit: Christian Johansson <christian@cvj.se>

    Test of parser not dependent on buffer name
---
 test/phps-mode-test-parser.el | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/test/phps-mode-test-parser.el b/test/phps-mode-test-parser.el
index 9ce280e..3f7eb6a 100644
--- a/test/phps-mode-test-parser.el
+++ b/test/phps-mode-test-parser.el
@@ -31,19 +31,16 @@
 (require 'phps-mode-parser)
 
 (defun phps-mode-test-parser--buffer-contents (buffer-contents name logic)
-  (generate-new-buffer "*PHPs Lexer*")
-  (with-current-buffer "*PHPs Lexer*"
-    (kill-region (point-min) (point-max))
+  (with-temp-buffer
+    (when (get-buffer "*PHPs Lexer*")
+      (kill-buffer "*PHPs Lexer*"))
     (insert buffer-contents)
     (message
      "Testing buffer %S with buffer-contents:\n%S\n"
      name
      (buffer-substring-no-properties (point-min) (point-max)))
-
     (funcall logic)
-
-    (message "Passed %s" name)
-    (kill-buffer)))
+    (message "Passed %s" name)))
 
 (defun phps-mode-test-parser-boundaries ()
   "Run test for lexer."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]