awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Add tools/password-store unit test (#103)

Browse Source
This commit is contained in:
Henrik Lissner
2017-06-12 02:38:36 +02:00
parent 77298f3672
commit febd14a9f2
1 changed files with 23 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
test/modules/tools/test-password-store.el Normal file
View File

@ -0,0 +1,23 @@
;;; test/modules/feature/test-password-store.el
(require! :tools password-store t)
;;
(def-test-group! tools/password-store
(ert-deftest get-field ()
(let ((data `((secret . "defuse-account-gad")
("login" . "HL2532-GANDI")
("alt-login" . "hlissner")
("email" . "henrik@lissner.net")
("url" . "https://www.gandi.net/login"))))
(should (equal (+pass-get-field data "login")
"HL2532-GANDI"))
(should (equal (+pass-get-field data "email")
"henrik@lissner.net"))
(should (equal (+pass-get-field data '("alt-login" "email"))
"hlissner"))
(should (equal (+pass-get-field data '("username" "email"))
"henrik@lissner.net"))
(should-not (+pass-get-field data '("x" "y" "z"))))
(should-error (+pass-get-field nil nil))))