From ef9569455f03fbc3029c661052ea3ac4abddb7d0 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Tue, 20 Dec 2022 19:16:05 +0100 Subject: view/utils: process: Do not generate "pre" elements. The "pre" element has its own overflow setting, which causes individual lines to be either clipped or scrolled, which looks terrible. --- mumi/web/view/utils.scm | 10 +++++----- 1 file 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)))) -- cgit v1.2.3