aboutsummaryrefslogtreecommitdiff
path: root/tests/script04.at
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2011-07-30 16:51:01 +0300
committerSergey Poznyakoff <gray@gnu.org.ua>2011-07-30 16:51:01 +0300
commit004fd5299b3c24a1d11e6c450e5e763ea95779ad (patch)
tree3052034bd49efdb3fa84271e0eeccb6afc19e7cc /tests/script04.at
parent8006a1de47d492a2fc15e314a3851fb40e6622bd (diff)
downloadidest-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/script04.at')
-rw-r--r--tests/script04.at65
1 files changed, 65 insertions, 0 deletions
diff --git a/tests/script04.at b/tests/script04.at
new file mode 100644
index 0000000..8c83b1f
--- /dev/null
+++ b/tests/script04.at
@@ -0,0 +1,65 @@
+# 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([basic scripting: altering frames])
+AT_KEYWORDS([script edit alter script04])
+
+AT_DATA([delpic.scm],[
+(define (idest-main file frames)
+ (filter
+ (lambda (frame)
+ (not (string=? (car frame) "APIC")))
+ frames))
+
+(set! idest-readonly #f)
+])
+
+AT_CHECK([
+PREREQ_GUILE
+genfile -f file -p $abs_srcdir/id3v2 10k
+echo removing APIC frames
+idest -N -S ./delpic.scm file
+echo tags
+idest -a file
+],
+[0],
+[removing APIC frames
+tags
+TIT2: File
+TALB: Idest Test Suite
+TRCK: 1
+COMM:eng:: Sample ID3 headers for idest testsuite
+TPE1: Sergey Poznyakoff
+TDRC: 2011
+TCON: Sample headers
+TCOP: This file is part of Idest Copyright (C) 2009-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/>.
+TENC: Idest
+USLT:eng:: IdEst is an ID3 Edit and Scripting Tool, a command line utility for
+manipulating ID3 tags. ID3 tag is a metadata container which supplies
+related information for a MP3 audio file. It allows information such
+as the title, artist, album, track number, etc. to be stored in the file
+itself.
+
+The idest utility allows to create new tags, and to view,
+modify or delete the existing ones. When compiled with Guile,
+IdEst allows you to write programs of arbitrary complexity for
+manipulating ID3 tags and to apply them to any number of files.
+WPUB: http://www.gnu.org.ua/software/idest
+WXXX:documentation: http://www.gnu.org.ua/software/idest/manual
+WXXX:author: http://gray.gnu.org.ua
+])
+
+AT_CLEANUP

Return to:

Send suggestions and report system problems to the System administrator.