Skip to content

Commit

Permalink
Fixed spelling error
Browse files Browse the repository at this point in the history
  • Loading branch information
Christian Romney committed Aug 16, 2011
1 parent a425e91 commit 909b18a
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion docs/uberdoc.html
Original file line number Diff line number Diff line change
Expand Up @@ -2581,7 +2581,7 @@
</td><td class="codes" /><pre class="brush: clojure">(defn pay-partners [a b]
(map #(pay % *partner*) [a b]))</pre></tr><tr><td class="docs"><p>Pay both strategies for defection.</p>
</td><td class="codes" /><pre class="brush: clojure">(defn pay-defectors [a b]
(map #(pay % *defector*) [a b]))</pre></tr><tr><td class="docs"><p>Reward the backstaber and punish the sucker.</p>
(map #(pay % *defector*) [a b]))</pre></tr><tr><td class="docs"><p>Reward the backstabber and punish the sucker.</p>
</td><td class="codes" /><pre class="brush: clojure">(defn pay-betrayal [backstabber sucker]
[(pay backstabber *backstabber*)
(pay sucker *sucker*)])</pre></tr><tr><td class="docs"><h3>Strategy Implementations</h3>
Expand Down
2 changes: 1 addition & 1 deletion src/prisoners/core.clj
Original file line number Diff line number Diff line change
Expand Up @@ -80,7 +80,7 @@
(defn pay-defectors [a b]
(map #(pay % *defector*) [a b]))

;; Reward the backstaber and punish the sucker.
;; Reward the backstabber and punish the sucker.
(defn pay-betrayal [backstabber sucker]
[(pay backstabber *backstabber*)
(pay sucker *sucker*)])
Expand Down

0 comments on commit 909b18a

Please sign in to comment.