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 | |||
@@ -7,8 +7,9 @@ PATH=@abs_top_builddir@/src:$PATH | |||
7 | XFAILFILE=$abs_builddir/.badversion | 7 | XFAILFILE=$abs_builddir/.badversion |
8 | 8 | ||
9 | trap "cleanup; test -r $XFAILFILE && cat $XFAILFILE; exit $?" 1 2 13 15 | 9 | 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,8 +1,8 @@ | |||
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 |
6 | # the Free Software Foundation; either version 3, or (at your option) | 6 | # the Free Software Foundation; either version 3, or (at your option) |
7 | # any later version. | 7 | # any later version. |
8 | # | 8 | # |
@@ -15,17 +15,17 @@ | |||
15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. | 15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. |
16 | 16 | ||
17 | AT_SETUP([examples: delcomm]) | 17 | 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 |
29 | idest -a file2 | 29 | idest -a file2 |
30 | ], | 30 | ], |
31 | [0], | 31 | [0], |
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,8 +1,8 @@ | |||
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 |
6 | # the Free Software Foundation; either version 3, or (at your option) | 6 | # the Free Software Foundation; either version 3, or (at your option) |
7 | # any later version. | 7 | # any later version. |
8 | # | 8 | # |
@@ -15,18 +15,17 @@ | |||
15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. | 15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. |
16 | 16 | ||
17 | AT_SETUP([formats: shortlist]) | 17 | 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 |
30 | file2: File by Sergey Poznyakoff, 2011 | 29 | file2: File by Sergey Poznyakoff, 2011 |
31 | ]) | 30 | ]) |
32 | 31 | ||
diff --git a/tests/framelist00.at b/tests/framelist00.at index 894d0f0..1faaeb0 100644 --- a/tests/framelist00.at +++ b/tests/framelist00.at | |||
@@ -1,8 +1,8 @@ | |||
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 |
6 | # the Free Software Foundation; either version 3, or (at your option) | 6 | # the Free Software Foundation; either version 3, or (at your option) |
7 | # any later version. | 7 | # any later version. |
8 | # | 8 | # |
@@ -15,15 +15,15 @@ | |||
15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. | 15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. |
16 | 16 | ||
17 | AT_SETUP([formats: framelist --full]) | 17 | 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" |
27 | TALB descr="Album/movie/show title" | 27 | TALB descr="Album/movie/show title" |
28 | TRCK descr="Track number/position in set" | 28 | TRCK descr="Track number/position in set" |
29 | COMM descr="Comments" lang="eng" condesc="" | 29 | COMM descr="Comments" lang="eng" condesc="" |
diff --git a/tests/framelist01.at b/tests/framelist01.at index 59e5ca2..1e37262 100644 --- a/tests/framelist01.at +++ b/tests/framelist01.at | |||
@@ -1,8 +1,8 @@ | |||
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 |
6 | # the Free Software Foundation; either version 3, or (at your option) | 6 | # the Free Software Foundation; either version 3, or (at your option) |
7 | # any later version. | 7 | # any later version. |
8 | # | 8 | # |
@@ -15,15 +15,15 @@ | |||
15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. | 15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. |
16 | 16 | ||
17 | AT_SETUP([formats: framelist --frames]) | 17 | 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 |
27 | COMM | 27 | COMM |
28 | APIC | 28 | APIC |
29 | APIC | 29 | APIC |
diff --git a/tests/framelist02.at b/tests/framelist02.at index c56d11e..6376ca7 100644 --- a/tests/framelist02.at +++ b/tests/framelist02.at | |||
@@ -1,8 +1,8 @@ | |||
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 |
6 | # the Free Software Foundation; either version 3, or (at your option) | 6 | # the Free Software Foundation; either version 3, or (at your option) |
7 | # any later version. | 7 | # any later version. |
8 | # | 8 | # |
@@ -15,15 +15,15 @@ | |||
15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. | 15 | # along with idest. If not, see <http://www.gnu.org/licenses/>. |
16 | 16 | ||
17 | AT_SETUP([formats: framelist --single-line]) | 17 | 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 | ], |