From c15c616eb16b572cfb4495bd71c2909be243c75c Mon Sep 17 00:00:00 2001 From: Philipp Stephani Date: Mon, 31 Oct 2016 18:16:50 +0100 Subject: [PATCH] =?utf8?q?Remove=20tests,=20which=20don=E2=80=99t=20work?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Fixes https://github.com/jwiegley/use-package/issues/399 --- test/lisp/use-package/use-package-tests.el | 52 ---------------------- 1 file changed, 52 deletions(-) delete mode 100644 test/lisp/use-package/use-package-tests.el diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el deleted file mode 100644 index 0644a5ee493..00000000000 --- a/test/lisp/use-package/use-package-tests.el +++ /dev/null @@ -1,52 +0,0 @@ -;;; use-package-tests.el --- Tests for use-package.el - -;; 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 2, 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: - -;; - - -;;; Code: - -(require 'ert) -(require 'use-package) - -(ert-deftest use-package-mplist-get () - (let ((mplist '(:foo bar baz bal :blob plap plup :blam)) - (tests '((:foo . (bar baz bal)) - (:blob . (plap plup)) - (:blam . t) - (:blow . nil)))) - (mapc (lambda (test) - (should - (equal - (use-package-mplist-get mplist - (car test)) - (cdr test)))) - tests))) - -(ert-deftest use-package-mplist-keys () - (should (equal (use-package-mplist-keys - '(:foo bar baz bal :blob plap plup :blam)) - '(:foo :blob :blam)))) - -;; Local Variables: -;; indent-tabs-mode: nil -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; use-package-tests.el ends here -- 2.39.2