diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-07-30 16:51:01 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-07-30 16:51:01 +0300 |
commit | 004fd5299b3c24a1d11e6c450e5e763ea95779ad (patch) | |
tree | 3052034bd49efdb3fa84271e0eeccb6afc19e7cc /tests/setpic.at | |
parent | 8006a1de47d492a2fc15e314a3851fb40e6622bd (diff) | |
download | idest-004fd5299b3c24a1d11e6c450e5e763ea95779ad.tar.gz idest-004fd5299b3c24a1d11e6c450e5e763ea95779ad.tar.bz2 |
Finish the testsuite.
* scheme/Makefile.am: Rewrite.
* src/frametab.gperf (frametab_enumerate): Minor fix.
* tests/Makefile.am (TESTSUITE_AT): Add new testcases.
(EXTRA_DIST): Add idest-32.png and idest-68.png.
* tests/testsuite.at: Add new testcases.
* tests/atlocal.in (GUILE_VERSION,INSTALL_PROG): New variables.
* tests/id3v2: Remove trailing whitespace from USLT.
* tests/delcomm.at: New file.
* tests/fmt-shortlist.at: New file.
* tests/framelist00.at: New file.
* tests/framelist01.at: New file.
* tests/framelist02.at: New file.
* tests/list1.at: New file.
* tests/list2.at: New file.
* tests/lyrics00.at: New file.
* tests/pic00.at: New file.
* tests/pic01.at: New file.
* tests/script00.at: New file.
* tests/script01.at: New file.
* tests/script02.at: New file.
* tests/script03.at: New file.
* tests/script04.at: New file.
* tests/script05.at: New file.
* tests/script06.at: New file.
* tests/script07.at: New file.
* tests/script08.at: New file.
* tests/setlyrics.at: New file.
* tests/setpic.at: New file.
* tests/settitle.at: New file.
* tests/shortlist.at: New file.
* tests/version.at: Remove useless prereq.
Diffstat (limited to 'tests/setpic.at')
-rw-r--r-- | tests/setpic.at | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/tests/setpic.at b/tests/setpic.at new file mode 100644 index 0000000..82642cb --- /dev/null +++ b/tests/setpic.at @@ -0,0 +1,32 @@ +# This file is part of idest -*- autotest -*- +# Copyright (C) 2011 Sergey Poznyakoff +# +# Idest is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3, or (at your option) +# any later version. +# +# Idest is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with idest. If not, see <http://www.gnu.org/licenses/>. + +AT_SETUP([batch: setpic]) +AT_KEYWORDS([script batch setpic]) + + +AT_CHECK([ +PREREQ_GUILE +genfile -f file 10k +idest -N -p $abs_top_srcdir/scheme --batch \ + setpic -d '32x32 picture' -f $abs_srcdir/idest-32.png file +idest -a file | sed 's/ *$//' +], +[0], +[APIC:image/png:0:32x32 picture: 89504E470D0A1A0A0000000D4948445200000020000000200806000000737A7AF4000000017352474200AECE1CE900000006624B474400FF00FF00FFA0BDA793000000097048597300000B1300000B1301009A9C180000000774494D4507DB071C093A2D7365CBF80000001974455874436F6D6D656E74004372656174656420776974682047494D5057810E17000000954944415458C3ED56D10A002108D3E8FF7F79F7D421125D696107FA16452E5D6E0C00141885826309003313339BF7AFAC40F55EB0FAE2AD1568C9019095CBFF226102D0D1FA6EF97E2F8F72122680049000AE96E3DE749B9D5B5229DD7EE0E4B07419125D21A90DF2CCE801653691169C911991EBE32D98EDF5F65FA0135AE5D8ED07BC04ADAB64EB116DD4822F12A6214900E1001E26BD48441311DC6B0000000049454E44AE426082 +]) +x +AT_CLEANUP |