From cfdefb863c274ecdbd452836364e68e1028c7bb1 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Tue, 26 May 2020 15:15:10 -0500 Subject: gnu: netsurf: Remove tabulations in source. * gnu/packages/web.scm (netsurf): Remove tabulations. --- gnu/packages/web.scm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index d8290ff53a..66774c4a2d 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -5322,18 +5322,18 @@ w3c webidl files and a binding configuration file.") (display (read-line in 'concat) out) (sxml->xml (let rec ((sxml (xml->sxml in - #:default-entity-handler - (lambda (port name) - (string-append "" - (symbol->string name) - ""))))) + #:default-entity-handler + (lambda (port name) + (string-append "" + (symbol->string name) + ""))))) ;; We'd like to use sxml-match here, but it can't ;; match against generic tag symbols... (match sxml (`(div (@ (class "links")) . ,rest) '()) - (`(ENTITY ,ent) - `(*ENTITY* ,ent)) + (`(ENTITY ,ent) + `(*ENTITY* ,ent)) ((x ...) (map rec x)) (x x))) -- cgit v1.2.3