diff options
Diffstat (limited to 'config.scm')
-rw-r--r-- | config.scm | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -8,6 +8,7 @@ (feed-handler) ((ice-9 i18n) :select (make-locale)) + ((texinfo string-utils) :select (escape-special-chars)) ((calp util) :select (->)) ((datetime) :select (datetime datetime->string @@ -24,7 +25,8 @@ (call-with-values (lambda () (apply values ((sxpath '(rss:title *text*)) tag))) (case-lambda (() tag) ((title . _) - (if (string-match "^\\[\\$\\]" title) + (if (string-match (escape-special-chars "^[$]" "[]$" #\\) + title) '() tag)))))))) (make-feed |