From 82e1226f21e490d74817a3874e194a55287715cd Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 25 Dec 2022 21:10:02 +0200 Subject: Fix a typo --- src/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Main.hs b/src/Main.hs index 3d76f38..57305fe 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -117,7 +117,7 @@ update _ Nothing (ChangeRecord _ ChangeDelete) = return () update _ Nothing rec@(ChangeRecord _ _) = die $ "cannot update non-existing entry " ++ show (dn rec) update ldap (Just _) rec@(ChangeRecord _ ch) = do - putStrLn $ "modifing " ++ show (dn rec) + putStrLn $ "modifying " ++ show (dn rec) change ldap (dn rec) ch update ldap Nothing rec@(ContentRecord _ av) = do putStrLn $ "adding " ++ show (dn rec) -- cgit v1.2.3