mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
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.
This commit is contained in:
parent
6d467eb4d1
commit
118d6ef554
2 changed files with 1 additions and 6 deletions
|
|
@ -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))
|
||||
|
||||
|
|
|
|||
|
|
@ -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)))
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue