From 57b0f4c5bde98ca9c0824c879a449e16b8849be4 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Sun, 26 Feb 2012 12:02:57 +0100
Subject: Fix a stupid fence-post error.

---
 src/mulk/benki/wiki.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mulk/benki/wiki.clj b/src/mulk/benki/wiki.clj
index 27a7c00..8501d83 100644
--- a/src/mulk/benki/wiki.clj
+++ b/src/mulk/benki/wiki.clj
@@ -47,7 +47,7 @@
    (fn [x]
      (let [parens? (and (.startsWith x "(") (.endsWith x ")"))
            uri     (if parens?
-                     (subs x 1 (- (count x) 2))
+                     (subs x 1 (- (count x) 1))
                      x)]
        (fmt nil "~a<a href=\"~a\" class=\"benkiautohref\">~a</a>~a"
             (if parens? "(" "")
-- 
cgit v1.2.3