From b3b6dce07ceb5538e89ce8c49a8bd1fe2d6a15d1 Mon Sep 17 00:00:00 2001 From: Raymond Toy <toy.raymond@gmail.com> Date: Sun, 22 Dec 2013 22:59:37 -0800 Subject: [PATCH] Fix test trac.69: Move the setting of the logical pathname translation outside of the test. --- tests/trac.lisp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/tests/trac.lisp b/tests/trac.lisp index a2a1e35dd..64cbe81a2 100644 --- a/tests/trac.lisp +++ b/tests/trac.lisp @@ -207,10 +207,11 @@ (replace s s :start2 100 :end2 105))) (copy-seq "1234567890")))) +(setf (logical-pathname-translations "trac69") + '(("**;*.*.*" "/tmp/**/*.*"))) + (define-test trac.69 (:tag :trac) - (setf (logical-pathname-translations "trac69") - '(("**;*.*.*" "/tmp/**/*.*"))) (assert-error 'lisp::namestring-parse-error (let ((*default-pathname-defaults* #p"trac69:")) (pathname "/tmp/bar.lisp")))) -- GitLab