diff options
author | Thomas Miedema <thomasmiedema@gmail.com> | 2014-09-26 19:03:05 +0200 |
---|---|---|
committer | Thomas Miedema <thomasmiedema@gmail.com> | 2014-09-26 19:04:45 +0200 |
commit | e7ce4a66113a910af6327b3192e9ce4879a453cc (patch) | |
tree | 63f0dcd01d6aeef391585b79f796064a83396411 /tests/user001.hs | |
parent | 832ac1d654762876c811ca5fd7e04c01badaa754 (diff) |
Disable getlogin tests for the moment (#1487)
Diffstat (limited to 'tests/user001.hs')
-rw-r--r-- | tests/user001.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/user001.hs b/tests/user001.hs index f4c44fc..4b4dd8b 100644 --- a/tests/user001.hs +++ b/tests/user001.hs @@ -17,11 +17,11 @@ main = do p "getRealUserID" $ getRealUserID p "getEffectiveUserID" $ getEffectiveUserID p "getEffectiveGroupID" $ getEffectiveGroupID p "getGroups" $ getGroups - p "getLoginName" $ getLoginName + --p "getLoginName" $ getLoginName p "getEffectiveUserName" $ getEffectiveUserName p "getGroupEntryForID" $ getRealGroupID >>= getGroupEntryForID p "getGroupEntryForName" $ getRealGroupID >>= getGroupEntryForID >>= getGroupEntryForName . groupName p "getAllGroupEntries" $ getAllGroupEntries p "getUserEntryForID" $ getRealUserID >>= getUserEntryForID - p "getUserEntryForName" $ getLoginName >>= getUserEntryForName + --p "getUserEntryForName" $ getLoginName >>= getUserEntryForName p "getAllUserEntries" $ getAllUserEntries |