Добавление заголовочных файлов CORS в Spiffy (схема /Chicken)
Мне нужно подключить веб-приложение к интерфейсу REST, созданному в Scheme/Chicken с веб-сервером Spiffy.
Как добавить этот заголовок, используя правильный синтаксис Scheme, в конфигурационный файл.scm (начиная Spiffy с CSI -s /www/config.scm)?
Заголовок Access-Control-Allow-Origin: *
1 ответ
Когда вы принимаете процедуру в vhost-map
Вы можете просто обернуть его with-headers
, вот так:
(vhost-map `((".*" . ,(lambda (cont)
(with-headers '((access-control-allow-origin "*"))
cont)))))
При этом используется процедура с заголовками, которая просто добавляет заголовки к ответу, возвращаемому блоком. См. Документы Spiffy для получения дополнительной информации.