mirror of
git://git.gnupg.org/gnupg.git
synced 2025-07-03 22:56:33 +02:00
tests: Locate resources and scripts relative to top source dir.
-- Locate every resource and every script used in the tests using a path relative to the top of the source tree. This is a purely mechanical change, mostly done using regular expressions, with a few manual fixups here and there. Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
parent
f03d6897be
commit
ed4d23d75e
87 changed files with 208 additions and 182 deletions
|
@ -17,7 +17,7 @@
|
|||
;; You should have received a copy of the GNU General Public License
|
||||
;; along with this program; if not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
(load (with-path "defs.scm"))
|
||||
(load (in-srcdir "tests" "openpgp" "defs.scm"))
|
||||
(setup-legacy-environment)
|
||||
|
||||
(define files '("clearsig-1-key-1.asc" "signed-1-key-1.asc"))
|
||||
|
@ -27,7 +27,7 @@
|
|||
(let* ((status
|
||||
(call-popen
|
||||
`(,@gpg --verify --multifile --status-fd=1
|
||||
,@(map (lambda (name) (in-srcdir "samplemsgs" name)) files))
|
||||
,@(map (lambda (name) (in-srcdir "tests" "openpgp" "samplemsgs" name)) files))
|
||||
""))
|
||||
(lines (map (lambda (l)
|
||||
(assert (string-prefix? l "[GNUPG:] "))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue