Rolodex.hs: add missing type signature.

div' is only used with Dimension, used Integral to keep it general.

darcs-hash:20070919215436-928c4-5bdedd2e9a0154510e5d029eba05a45e3ec6acb8.gz

1 files changed, 1 insertions, 0 deletions

diff --git a/Roledex.hs b/Roledex.hs
index 02eecf8..89c0f24 100644
--- a/Roledex.hs
+++ b/Roledex.hs
@@ -62,5 +62,6 @@ roledexLayout sc ws = return ([(W.focus ws, mainPane)] ++
                 then (n - 1) : (cd (n-1) m)
                 else []
 
+div' :: Integral a => a -> a -> a
 div' _ 0 = 0
 div' n o = div n o