summaryrefslogtreecommitdiff
path: root/config.scm
diff options
context:
space:
mode:
Diffstat (limited to 'config.scm')
-rw-r--r--config.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/config.scm b/config.scm
index 888f5c8..e6be72d 100644
--- a/config.scm
+++ b/config.scm
@@ -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