From b8d5e73a7b783097c60d3046c9868a7b68656b5c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Georges=20Dup=C3=A9ron?= <georges.duperon@gmail.com>
Date: Wed, 17 Aug 2016 11:29:22 +0200
Subject: [PATCH] Typos and improvements in README. Thanks to O. Andreescu.

---
 README.md | 20 ++++++++++++++++++--
 1 file changed, 18 insertions(+), 2 deletions(-)

diff --git a/README.md b/README.md
index 3d1c7cd..02e76cc 100644
--- a/README.md
+++ b/README.md
@@ -6,12 +6,12 @@
 anaphoric
 =========
 
-Anaphoric conditionnal forms for `racket`:
+Anaphoric conditional forms for `racket`:
 
 ```
 (aif (member 'a lst)
   (displayln it)
-  (displayln "not found"))
+  (displayln "not found")) ;; Can't use "it" in the else clause.
 
 (awhen (member 'a lst)
   (displayln it))
@@ -20,4 +20,20 @@ Anaphoric conditionnal forms for `racket`:
   [(member 'a lst) (displayln it)]
   [(member 'b lst) (displayln it)]
   [else (displayln "not found")]) ;; Can't use "it" in the else clause.
+```
+
+This package also provides hygienic versions:
+
+```
+(if-let [x (member 'a lst)]
+  (displayln x)
+  (displayln "not found")) ;; Can't use "x" in the else clause.
+
+(when-let [x (member 'a lst)]
+  (displayln it))
+
+(cond-let x
+  [(member 'a lst) (displayln x)]
+  [(member 'b lst) (displayln x)]
+  [else (displayln "not found")]) ;; Can't use "x" in the else clause.
 ```
\ No newline at end of file