From ad28c940e28063f8731381834751a8e287c2d860 Mon Sep 17 00:00:00 2001 From: cage Date: Sat, 10 Apr 2021 21:03:34 +0200 Subject: [PATCH] - load a module even if loading an URL has been requested from the command line. --- modules/rewrite-message-urls.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/modules/rewrite-message-urls.lisp b/modules/rewrite-message-urls.lisp index 232ced0..1440257 100644 --- a/modules/rewrite-message-urls.lisp +++ b/modules/rewrite-message-urls.lisp @@ -62,7 +62,7 @@ So the whole list is like: '((\"foo\" \"bar\") (\"old\" \"new\") ...)") (original-string (line-oriented-window:normal-text row)) (skipped-row-types (list 'gemini-parser:pre-line 'gemini-parser:vertical-space))) - (if (member original-type skipped-row-types) + (if (find-if (lambda (a) (typep original-type a)) skipped-row-types) row (let* ((simple-string (tui:tui-string->chars-string original-string)) (replaced-string simple-string))