diff --git a/src/web-static.scm b/src/web-static.scm
index c358361..58ec505 100644
--- a/src/web-static.scm
+++ b/src/web-static.scm
@@ -68,7 +68,7 @@
 		     (get-process-output-lines
 		      (sprintf "git -C \"~A\" log -p -- \"~A\""
 			       (string-translate* (*members-directory*)
-						  '(("\"" "\\\"")))
+						  '(("\"" . "\\\"")))
 			       (member-file-name mr)
 			       ))))
 	   (when (not (null? lines))