summaryrefslogtreecommitdiff
path: root/Test.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-10-16 12:46:24 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-10-16 12:46:24 -0400
commit3a31b000bbe0db0948f0422020f7381909b93e57 (patch)
tree9fc63f92be8415d15bd4ac82f47b9079683092ed /Test.hs
parent12a038aa806f16004f4e4afa8f3ee9fa752eae29 (diff)
tighten file2key to not produce invalid keys with no keyName
A file named "foo-" or "foo-bar" was taken as a key's file, with a backend of "foo", and an empty keyName. This led to various problems, especially because converting that key back to a file did not yeild the same filename.
Diffstat (limited to 'Test.hs')
-rw-r--r--Test.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Test.hs b/Test.hs
index 34bf834c5..cc9fc43a6 100644
--- a/Test.hs
+++ b/Test.hs
@@ -119,6 +119,7 @@ quickcheck =
, check "prop_idempotent_deencode" Utility.Format.prop_idempotent_deencode
, check "prop_idempotent_fileKey" Locations.prop_idempotent_fileKey
, check "prop_idempotent_key_encode" Types.Key.prop_idempotent_key_encode
+ , check "prop_idempotent_key_decode" Types.Key.prop_idempotent_key_decode
, check "prop_idempotent_shellEscape" Utility.SafeCommand.prop_idempotent_shellEscape
, check "prop_idempotent_shellEscape_multiword" Utility.SafeCommand.prop_idempotent_shellEscape_multiword
, check "prop_logs_sane" Logs.prop_logs_sane