diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/atlocal.in | 3 | ||||
-rw-r--r-- | tests/delcomm.at | 6 | ||||
-rw-r--r-- | tests/fmt-shortlist.at | 7 | ||||
-rw-r--r-- | tests/framelist00.at | 6 | ||||
-rw-r--r-- | tests/framelist01.at | 6 | ||||
-rw-r--r-- | tests/framelist02.at | 6 | ||||
-rw-r--r-- | tests/list1.at | 7 | ||||
-rw-r--r-- | tests/list2.at | 7 | ||||
-rw-r--r-- | tests/lyrics00.at | 6 | ||||
-rw-r--r-- | tests/pic00.at | 5 | ||||
-rw-r--r-- | tests/pic01.at | 6 | ||||
-rw-r--r-- | tests/script00.at | 6 | ||||
-rw-r--r-- | tests/script01.at | 6 | ||||
-rw-r--r-- | tests/script02.at | 6 | ||||
-rw-r--r-- | tests/script03.at | 6 | ||||
-rw-r--r-- | tests/script04.at | 6 | ||||
-rw-r--r-- | tests/script05.at | 6 | ||||
-rw-r--r-- | tests/script06.at | 6 | ||||
-rw-r--r-- | tests/script07.at | 6 | ||||
-rw-r--r-- | tests/script08.at | 6 | ||||
-rw-r--r-- | tests/setlyrics.at | 6 | ||||
-rw-r--r-- | tests/setpic.at | 6 | ||||
-rw-r--r-- | tests/settitle.at | 7 | ||||
-rw-r--r-- | tests/shortlist.at | 7 | ||||
-rw-r--r-- | tests/testsuite.at | 7 |
25 files changed, 76 insertions, 76 deletions
diff --git a/tests/atlocal.in b/tests/atlocal.in index a302b99..35ad063 100644 --- a/tests/atlocal.in +++ b/tests/atlocal.in | |||
@@ -10,5 +10,6 @@ trap "cleanup; test -r $XFAILFILE && cat $XFAILFILE; exit $?" 1 2 13 15 | |||
10 | 10 | ||
11 | GUILE_VERSION="@GUILE_VERSION@" | 11 | GUILE_VERSION="@GUILE_VERSION@" |
12 | INSTALL_PROG="@INSTALL@" | 12 | INSTALL_PROG="@INSTALL@" |
13 | 13 | GUILE_AUTO_COMPILE=0 | |
14 | export GUILE_AUTO_COMPILE | ||
14 | 15 | ||
diff --git a/tests/delcomm.at b/tests/delcomm.at index f263061..236f05a 100644 --- a/tests/delcomm.at +++ b/tests/delcomm.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,11 +18,11 @@ AT_SETUP([examples: delcomm]) | |||
18 | AT_KEYWORDS([script examples delcomm]) | 18 | AT_KEYWORDS([script examples delcomm]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | genfile -f file1 -s $abs_srcdir/id3v1 10k | 22 | genfile -f file1 -s $abs_srcdir/id3v1 10k |
23 | genfile -f file2 -p $abs_srcdir/id3v2 10k | 23 | genfile -f file2 -p $abs_srcdir/id3v2 10k |
24 | 24 | ||
25 | idest -N -S $abs_top_srcdir/examples/delcomm.scm file1 file2 | 25 | idest -N -S $abs_top_srcdir/examples/delcomm.scm file1 file2]) |
26 | echo file1 | 26 | echo file1 |
27 | idest -a file1 | 27 | idest -a file1 |
28 | echo file2 | 28 | echo file2 |
diff --git a/tests/fmt-shortlist.at b/tests/fmt-shortlist.at index 925646c..d529d84 100644 --- a/tests/fmt-shortlist.at +++ b/tests/fmt-shortlist.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,12 +18,11 @@ AT_SETUP([formats: shortlist]) | |||
18 | AT_KEYWORDS([script format shortlist]) | 18 | AT_KEYWORDS([script format shortlist]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | |||
23 | genfile -f file1 -s $abs_srcdir/id3v1 10k | 22 | genfile -f file1 -s $abs_srcdir/id3v1 10k |
24 | genfile -f file2 -p $abs_srcdir/id3v2 10k | 23 | genfile -f file2 -p $abs_srcdir/id3v2 10k |
25 | 24 | ||
26 | idest -N -p $abs_top_srcdir/scheme --format shortlist file1 file2 | 25 | idest -N -p $abs_top_srcdir/scheme --format shortlist file1 file2]) |
27 | ], | 26 | ], |
28 | [0], | 27 | [0], |
29 | [file1: File by Sergey Poznyakoff, 2011 | 28 | [file1: File by Sergey Poznyakoff, 2011 |
diff --git a/tests/framelist00.at b/tests/framelist00.at index 894d0f0..1faaeb0 100644 --- a/tests/framelist00.at +++ b/tests/framelist00.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,9 +18,9 @@ AT_SETUP([formats: framelist --full]) | |||
18 | AT_KEYWORDS([script format framelist--full framelist00]) | 18 | AT_KEYWORDS([script format framelist--full framelist00]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | genfile -f file -p $abs_srcdir/id3v2 10k | 22 | genfile -f file -p $abs_srcdir/id3v2 10k |
23 | idest -N -p $abs_top_srcdir/scheme --format framelist --full file | 23 | idest -N -p $abs_top_srcdir/scheme --format framelist --full file]) |
24 | ], | 24 | ], |
25 | [0], | 25 | [0], |
26 | [TIT2 descr="Title/songname/content description" | 26 | [TIT2 descr="Title/songname/content description" |
diff --git a/tests/framelist01.at b/tests/framelist01.at index 59e5ca2..1e37262 100644 --- a/tests/framelist01.at +++ b/tests/framelist01.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,9 +18,9 @@ AT_SETUP([formats: framelist --frames]) | |||
18 | AT_KEYWORDS([script format framelist--frames framelist01]) | 18 | AT_KEYWORDS([script format framelist--frames framelist01]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | genfile -f file -p $abs_srcdir/id3v2 10k | 22 | genfile -f file -p $abs_srcdir/id3v2 10k |
23 | idest -N -p $abs_top_srcdir/scheme --format framelist --frames TIT2,COMM,APIC file | 23 | idest -N -p $abs_top_srcdir/scheme --format framelist --frames TIT2,COMM,APIC file]) |
24 | ], | 24 | ], |
25 | [0], | 25 | [0], |
26 | [TIT2 | 26 | [TIT2 |
diff --git a/tests/framelist02.at b/tests/framelist02.at index c56d11e..6376ca7 100644 --- a/tests/framelist02.at +++ b/tests/framelist02.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,9 +18,9 @@ AT_SETUP([formats: framelist --single-line]) | |||
18 | AT_KEYWORDS([script format framelist--single-line framelist02]) | 18 | AT_KEYWORDS([script format framelist--single-line framelist02]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | genfile -f file -p $abs_srcdir/id3v2 10k | 22 | genfile -f file -p $abs_srcdir/id3v2 10k |
23 | idest -N -p $abs_top_srcdir/scheme --format framelist --single-line file | 23 | idest -N -p $abs_top_srcdir/scheme --format framelist --single-line file]) |
24 | ], | 24 | ], |
25 | [0], | 25 | [0], |
26 | [TIT2,TALB,TRCK,COMM,TPE1,TDRC,TCON,TCOP,TENC,USLT,WPUB,WXXX,WXXX,APIC,APIC | 26 | [TIT2,TALB,TRCK,COMM,TPE1,TDRC,TCON,TCOP,TENC,USLT,WPUB,WXXX,WXXX,APIC,APIC |
diff --git a/tests/list1.at b/tests/list1.at index 80d869b..4464dfb 100644 --- a/tests/list1.at +++ b/tests/list1.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,12 +18,11 @@ AT_SETUP([examples: list1]) | |||
18 | AT_KEYWORDS([script examples list1]) | 18 | AT_KEYWORDS([script examples list1]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | |||
23 | genfile -f file1 -s $abs_srcdir/id3v1 10k | 22 | genfile -f file1 -s $abs_srcdir/id3v1 10k |
24 | genfile -f file2 -p $abs_srcdir/id3v2 10k | 23 | genfile -f file2 -p $abs_srcdir/id3v2 10k |
25 | 24 | ||
26 | idest -N -S $abs_top_srcdir/examples/list1.scm file1 file2 | 25 | idest -N -S $abs_top_srcdir/examples/list1.scm file1 file2]) |
27 | ], | 26 | ], |
28 | [0], | 27 | [0], |
29 | [file1 | 28 | [file1 |
diff --git a/tests/list2.at b/tests/list2.at index 73008c6..5bb082c 100644 --- a/tests/list2.at +++ b/tests/list2.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -18,12 +18,11 @@ AT_SETUP([examples: list2]) | |||
18 | AT_KEYWORDS([script examples list2]) | 18 | AT_KEYWORDS([script examples list2]) |
19 | 19 | ||
20 | AT_CHECK([ | 20 | AT_CHECK([ |
21 | PREREQ_GUILE | 21 | WITH_GUILE([ |
22 | |||
23 | genfile -f file1 -s $abs_srcdir/id3v1 10k | 22 | genfile -f file1 -s $abs_srcdir/id3v1 10k |
24 | genfile -f file2 -p $abs_srcdir/id3v2 10k | 23 | genfile -f file2 -p $abs_srcdir/id3v2 10k |
25 | 24 | ||
26 | idest -N -S $abs_top_srcdir/examples/list2.scm TIT2,TALB,COMM,TENC file1 file2 | 25 | idest -N -S $abs_top_srcdir/examples/list2.scm TIT2,TALB,COMM,TENC file1 file2]) |
27 | ], | 26 | ], |
28 | [0], | 27 | [0], |
29 | [file1 | 28 | [file1 |
diff --git a/tests/lyrics00.at b/tests/lyrics00.at index 0eefe05..1162398 100644 --- a/tests/lyrics00.at +++ b/tests/lyrics00.at | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of idest -*- autotest -*- | 1 | # This file is part of idest -*- autotest -*- |
2 | # Copyright (C) 2011 Sergey Poznyakoff | 2 | # Copyright (C) 2011, 2015 Sergey Poznyakoff |
3 | # | 3 | # |
4 | # Idest is free software; you can redistribute it and/or modify | 4 | # Idest is free software; you can redistribute it and/or modify |