diff --git a/collects/scribblings/guide/contracts-gotchas.scrbl b/collects/scribblings/guide/contracts-gotchas.scrbl
index 8fa34345c8..b71ed5d217 100644
--- a/collects/scribblings/guide/contracts-gotchas.scrbl
+++ b/collects/scribblings/guide/contracts-gotchas.scrbl
@@ -32,7 +32,7 @@ racket
 (define (make-adder x)
   (if (= 1 x)
       add1
-      (lambda (y) (+ x 1))))
+      (lambda (y) (+ x y))))
 (provide/contract [make-adder (-> number? (-> number? number?))])
 ]