emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/emms fba4599 2/8: Remove test files for now


From: ELPA Syncer
Subject: [elpa] externals/emms fba4599 2/8: Remove test files for now
Date: Sat, 5 Jun 2021 00:57:15 -0400 (EDT)

branch: externals/emms
commit fba4599027e9982a143922fdf279791a8334cf6e
Author: Grant Shangreaux <grant@unabridgedsoftware.com>
Commit: Grant Shangreaux <grant@unabridgedsoftware.com>

    Remove test files for now
---
 test.sh                    |   3 --
 test/emms-tracktag-test.el | 101 ---------------------------------------------
 test/test-all.el           |   6 ---
 3 files changed, 110 deletions(-)

diff --git a/test.sh b/test.sh
deleted file mode 100755
index 50547b1..0000000
--- a/test.sh
+++ /dev/null
@@ -1,3 +0,0 @@
-#!/bin/sh
-
-emacs -Q --batch --directory="." -l ert -l test/test-all.el -f 
ert-run-tests-batch-and-exit
diff --git a/test/emms-tracktag-test.el b/test/emms-tracktag-test.el
deleted file mode 100644
index 9b66d5e..0000000
--- a/test/emms-tracktag-test.el
+++ /dev/null
@@ -1,101 +0,0 @@
-;; emms-tracktag-test.el --- Unit tests for emms-tracktag module  -*- 
lexical-binding: t; -*-
-
-;; Copyright (C) 2021  Grant Shoshin Shangreaux
-
-;; Author: Grant Shoshin Shangreaux <grant@churls.world>
-;; Keywords:
-
-;; This program 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 of the License, or
-;; (at your option) any later version.
-
-;; This program 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 this program.  If not, see <https://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Tests for emms-tracktag.el
-
-;;; Code:
-
-(require 'emms)
-(require 'emms-tracktag)
-
-(ert-deftest emms-tracktag--map-track-info-test ()
-  "Ensure mapping of emms info to tracktag fields is correct."
-  (let ((track '(*track*
-                 (type . file) (name . "foo")
-                 (info-album . "The Sounds of the Sounds of Science")
-                 (info-artist . "Yo La Tengo")
-                 (info-title . "Sea Urchins")
-                 (info-date . "2020")
-                 (info-tracknumber . "1")))
-        (track2 '(*track*
-                  (info-composer . "Ira Kaplan, Georgia Hubley, James Mcnew")
-                  (info-performer . "Yo La Tengo")
-                  (info-year . "2002")
-                  (info-discnumber . "1")
-                  (info-note . "new soundtrack to an old film"))))
-    (should (seq-set-equal-p
-             '((album . "The Sounds of the Sounds of Science")
-               (artist . "Yo La Tengo")
-               (name . "Sea Urchins")
-               (year . "2020")
-               (number . "1"))
-             (emms-tracktag--map-track-info track)))
-    (should (seq-set-equal-p
-             '((composer . "Ira Kaplan, Georgia Hubley, James Mcnew")
-               (performer . "Yo La Tengo")
-               (year . "2002")
-               (album-number . "1")
-               (comment . "new soundtrack to an old film"))
-             (emms-tracktag--map-track-info track2)))))
-
-(ert-deftest emms-tracktag--build-args-test ()
-  "Ensure args for tracktag are properly formed."
-  (let ((track '(*track*
-                 (type . file) (name . "foo.flac")
-                 (info-album . "The Sounds of the Sounds of Science")
-                 (info-artist . "Yo La Tengo")
-                 (info-title . "Sea Urchins")
-                 (info-date . "2020")
-                 (info-tracknumber . "1")
-                 (info-composer . "Ira Kaplan, Georgia Hubley, James Mcnew")
-                 (info-performer . "Yo La Tengo")
-                 (info-discnumber . "1")
-                 (info-note . "new soundtrack to an old film"))))
-    (should (seq-set-equal-p
-             '("--album=The Sounds of the Sounds of Science"
-               "--artist=Yo La Tengo"
-               "--name=Sea Urchins"
-               "--year=2020"
-               "--number=1"
-               "--composer=Ira Kaplan, Georgia Hubley, James Mcnew"
-               "--performer=Yo La Tengo"
-               "--album-number=1"
-               "--comment=new soundtrack to an old film"
-               "foo.flac")
-             (emms-tracktag--build-args track)))
-    (let ((track-with-empty-strings (copy-alist track)))
-      (setcdr (assq 'info-title track-with-empty-strings) "")
-      (setcdr (assq 'info-note track-with-empty-strings) "")
-      (should (seq-set-equal-p
-               '("--album=The Sounds of the Sounds of Science"
-                 "--artist=Yo La Tengo"
-                 "--year=2020"
-                 "--number=1"
-                 "--composer=Ira Kaplan, Georgia Hubley, James Mcnew"
-                 "--performer=Yo La Tengo"
-                 "--album-number=1"
-                 "--remove-comment"
-                 "--remove-name"
-                 "foo.flac")
-               (emms-tracktag--build-args track-with-empty-strings))))))
-
-;;; emms-tracktag-test.el ends here
diff --git a/test/test-all.el b/test/test-all.el
deleted file mode 100644
index 36f00c7..0000000
--- a/test/test-all.el
+++ /dev/null
@@ -1,6 +0,0 @@
-;; maybe not needed, but ensures tests run against the latest changes
-(byte-recompile-directory ".")
-
-(mapc #'load
-      (mapcar (lambda (f) (file-truename (concat "test/" f)))
-              (seq-filter (lambda (f) (string-match "[^.#]+\\test.el$" f)) 
(directory-files (file-truename "./test")))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]