Browse Source

Add test for names of stored playlists

tags/v0.7.0
Damien Cassou 2 years ago
parent
commit
8e6df4abf6
No known key found for this signature in database GPG Key ID: A7123815F5DCE914
1 changed files with 6 additions and 3 deletions
  1. +6
    -3
      test/libmpdel-test.el

+ 6
- 3
test/libmpdel-test.el View File

@@ -75,10 +75,13 @@
(ert-deftest libmpdel-entity-name ()
(let* ((artist (libmpdel--artist-create :name "The Artist"))
(album (libmpdel--album-create :name "The Album" :artist artist))
(song (libmpdel--song-create :name "The song" :album album)))
(should (equal "The Artist"(libmpdel-entity-name artist)))
(song (libmpdel--song-create :name "The song" :album album))
(stored-playlist (libmpdel--stored-playlist-create :name "The playlist")))
(should (equal "The Artist" (libmpdel-entity-name artist)))
(should (equal "The Album" (libmpdel-entity-name album)))
(should (equal "The song" (libmpdel-entity-name song)))))
(should (equal "The song" (libmpdel-entity-name song)))
(should (equal "The playlist" (libmpdel-entity-name stored-playlist)))))

;;; Helper functions



Loading…
Cancel
Save