summaryrefslogtreecommitdiff
path: root/mumi/web/view/utils.scm
diff options
context:
space:
mode:
Diffstat (limited to 'mumi/web/view/utils.scm')
-rw-r--r--mumi/web/view/utils.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/mumi/web/view/utils.scm b/mumi/web/view/utils.scm
index 9789d03..0a43b06 100644
--- a/mumi/web/view/utils.scm
+++ b/mumi/web/view/utils.scm
@@ -80,22 +80,22 @@ with the next context."
(cond
((string= "---" line)
`(div (@ (class "line diff separator"))
- ,line-anchor (pre ,line)))
+ ,line-anchor ,line))
((string-prefix? "+" line)
`(div (@ (class "line diff addition"))
- ,line-anchor (pre ,line)))
+ ,line-anchor ,line))
((and (string-prefix? "-" line)
(not (string= "--" line))
(not (string= "-- " line)))
`(div (@ (class "line diff deletion"))
- ,line-anchor (pre ,line)))
+ ,line-anchor ,line))
((string-prefix? "@@" line)
`(div (@ (class "line diff range"))
- ,line-anchor (pre ,line)))
+ ,line-anchor ,line))
(else
`(div (@ (class "line"))
,line-anchor
- (pre ,line))))))
+ ,line)))))
(values (cons (add-block-line! block formatted-line)
other-blocks)
context))))