emacs-diffs
[Top][All Lists]
Advanced

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

master 118d6ef: Remove some XEmacs compat code from tests


From: Stefan Kangas
Subject: master 118d6ef: Remove some XEmacs compat code from tests
Date: Wed, 13 Jan 2021 09:19:14 -0500 (EST)

branch: master
commit 118d6ef554e9e821925578d6ca6f3fd3d4cba780
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Remove some XEmacs compat code from tests
    
    * test/lisp/cedet/srecode-utest-getset.el
    (srecode-utest-getset-output):
    * test/lisp/cedet/srecode-utest-template.el
    (srecode-utest-template-output): Remove XEmacs compat code.
---
 test/lisp/cedet/srecode-utest-getset.el   | 1 -
 test/lisp/cedet/srecode-utest-template.el | 6 +-----
 2 files changed, 1 insertion(+), 6 deletions(-)

diff --git a/test/lisp/cedet/srecode-utest-getset.el 
b/test/lisp/cedet/srecode-utest-getset.el
index 0497dea..1c65780 100644
--- a/test/lisp/cedet/srecode-utest-getset.el
+++ b/test/lisp/cedet/srecode-utest-getset.el
@@ -128,7 +128,6 @@ private:
        (srecode-utest-getset-jumptotag "miscFunction"))
 
       (let ((pos (point)))
-       (skip-chars-backward " \t\n") ; xemacs forward-comment is different.
        (forward-comment -1)
        (re-search-forward "miscFunction" pos))
 
diff --git a/test/lisp/cedet/srecode-utest-template.el 
b/test/lisp/cedet/srecode-utest-template.el
index 57d8a64..f97ff18 100644
--- a/test/lisp/cedet/srecode-utest-template.el
+++ b/test/lisp/cedet/srecode-utest-template.el
@@ -307,13 +307,9 @@ INSIDE SECTION: ARG HANDLER ONE")
       (should (srecode-table major-mode))
 
       ;; Loop over the output testpoints.
-
       (dolist (p srecode-utest-output-entries)
-       (set-buffer testbuff) ;; XEmacs causes a buffer switch.  I don't know 
why
-       (should-not (srecode-utest-test p))
-       )
+        (should-not (srecode-utest-test p)))))
 
-      ))
   (when (file-exists-p srecode-utest-testfile)
     (delete-file srecode-utest-testfile)))
 



reply via email to

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