controller: Do not hash msgid term twice.

diff --git a/mumi/web/controller.scm b/mumi/web/controller.scm
index 2acba24e0e2ad1f58b84a9b16dee9d818592d77f..8f1db92a1383eed518d670e930fe98646b56aff6 100644 (file)
--- a/mumi/web/controller.scm
+++ b/mumi/web/controller.scm
@@ -130,7 +130,7 @@
                  (render-html (unknown id))))
            (render-html (unknown id)))))
     (('GET "msgid" msgid)
-     (match (search (format #false "msgid:~a" (msgid-hash msgid)))
+     (match (search (format #false "msgid:~a" msgid))
        ((id . rest)
         (redirect (list "issue" id)
                   #:fragment (format #false "msgid-~a" (msgid-hash msgid))))