From aeb2ebd9f4fee73e05823b38eee3656afad7919d Mon Sep 17 00:00:00 2001
From: Adam Sampson <ats@offog.org>
Date: Tue, 1 Apr 2008 13:22:30 +0000
Subject: [PATCH] Fix Haddock.

---
 common/Utils.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/common/Utils.hs b/common/Utils.hs
index 1fb2d4c..e59d313 100644
--- a/common/Utils.hs
+++ b/common/Utils.hs
@@ -293,6 +293,6 @@ makeArraySize :: (IArray a e, Ix i, Enum i) => (i,i) -> e -> a i e -> a i e
 makeArraySize size def arr = array size [(i,arrayLookupWithDefault def arr i) | i <- [fst size .. snd size]]
 
 -- | Replace one item in a list by index.
--- This is like '(//)'.
+-- This is like '(\/\/)'.
 replaceAt :: Int -> a -> [a] -> [a]
 replaceAt n rep es = [if i == n then rep else e | (e, i) <- zip es [0..]]