* tests/cedet/semantic/stltest.el:
* tests/cedet/semantic/utest-parse.el:
* tests/cedet/srecode/fields-utest.el:
* tests/cedet/srecode/test-getset.el:
* tests/cedet/srecode/test.el:
* tests/eieio/eieio-test-persist.el: Make all those tests use
`make-temp-name' for their test files, so that tests can run in
parallel.
;;; Master Harness
;;
-(defvar srecode-utest-testfile "/tmp/srecode-utest.srt"
+(defvar srecode-utest-testfile
+ (expand-file-name (concat (make-temp-name "srecode-utest-") ".srt") temporary-file-directory)
"File used to do testing.")
;;;###autoload
"SRECODE Templates"
nil ; How to detect a problem?
)
- )))
+ ))
+ (when (file-exists-p srecode-utest-testfile)
+ (delete-file srecode-utest-testfile)))
;;; Project test
;;
(error "Project template found when not in project")))
;;
- )))
+ ))
+ (when (file-exists-p srecode-utest-testfile)
+ (delete-file srecode-utest-testfile)))
(provide 'cedet/srecode/test)